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0200 

0202 

8204 
0205 
0206 
0207 
02119 
0211 
0212 



6413 
6504 
6465 
6457 
6446 
6473 
6510 
6323 
5760 
7016 
7121 

6741 
6742 
6743 
6744 
6745 
6746 
6747 

'S120 
■4422 

4416 

4437 
44J7 
4430 
4431 
4432 
4433 
44J4 
4435 
4440 
4421 
4444 
4441 
4442 
4443 
4445 
4446 
4447 

44$e 

4451 
4452 
4453 
4126 
4454 



/RKSE PiSKi,tSS CONtROU TEST 
/ 

/k\,L KNOWN HLTS 
/ 

E:RHt.T2 

EHHI.T4 

ERHutS 

ERHtT7 

ENOHIT 
STPHUT 

CHNHLt 
/ 

DSKP«6741 
DCt«»6742 
0L4GO6743 
0uCA»6744 
DRST"674S 
0l,DC«6746 
D«AN»6747 



ENHAN1»JMS 1 
ENHA^i2"'aMS J 

EHROHrJHS I 
10NKAT = vlMS I 
ACCMF^sJMS I 

R3STAT»JMS J 
RQCMO=JMS S 
ROADD»gMS I 

tOADO'^MS t 
DSKSKP»JHS 1 
LSCMOeJMS i 

CLRALU=J"S 1 
RDCKC'^WS ; 

P R N f E K a J M S i 

T».OCTeJMS 1 
TVPESJMS I 
CRi.Fs^'^S 1 



xchamc 

HAmTST 

XMAlNl 

XMAIN2 

XNERWO 

XERRO 

XIOMWT 

XOOHPI 

XC0MP2 

XR6ST 

XROCH 

XR6AD 

XUPPER 

Xl(l)AD 

XS6KP 

X1.BCA 

XCLOR 

XROCR 

XL,SHN 

XR6BF 

XPRN 

XFROCT 

xtqct 

XPRINT 
XCRLF 



/ S K ! P 
/SKIP 
/SKIP 

/Hcgo 

/Lho 



FINE? IS'fRBj^T 

"tra? FeR OSis 

TRtP FOR Dllfi 

TRAP FOR DLCt 

TRAP ro« DBS* 

f«s* FOR DLDC 



fRsP 



'AN 



Vp»8tE ERROR KAt,T 
OF TEST HALT 

JHANJe HA1.T 



/SKIP Transfer qQ'^i or ?rror 

/51.EAK DISK CONTROL tOQIC 
/(.SAD ADDRESS A NO GO 
/|,eAO CURRENT ADDRESS 
/HC*0 ITAluS RCCISTfR 
/tOAO COHMaNB HEOISTER 
/UOAO MAINTENANCE 



cie!00 
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0202 






0 




5001 




5001 


0ac2 


?0e2 




0002 


0003 


:'003 


/ 


0003 




0010 


»10 

/ 




0010 


0000 


AUTO10I 
/ 


0 




0020 


• 20 




0020 


7101 


/ 


c-hang 


0221 


7855 


XyPftR, 


yPPER 


0022 


6000 


MAN1ST, 


MANgt- 


0023 


5411 


!NTHO, 


INTAOO 


0024 


5747 


XEKJO, 


ENOTST 


0025 


^210 


THSFUO, 


PRSFLD 


0026 


6737 


XPRINT, 


PRINT 


0027 


7007 


XNEKHOi 


NERRO 


0230 


6200 


XERHO, 


ERRO 


0031 


6400 


XJONWr, 


JONWT 


0B32 


6415 


XgOMPli 


COMPl 


0033 


6425 




C0MP2 


0034 


6443 


XRObT ( 


RpST 


0035 


6551 


XRDCH, 


RDCM 


0036 


6567 


XhlAlNl, 


HAlNl 


0037 


7000 


XMA1N2| 


MAJN2 


0040 


6511 


XRDAD, 


ROAO 


0041 


6474 


XSOKP, 


SDKP 


0042 


6466 


XtDCM, 


LDOM 


0043 


6452 


XtDCA, 


UOCA 


0044 


6460 


X1.0A0, 


|,0A0 


0045 


6501 


XCLURf 


CUOK 


0046 


6600 


XRDCH, 


RPCR 


0047 


6505 


XtOMN, 


I.OMN 


0050 


6537 


XROBF, 


Roer 


0051 


6701 


XPRNi 


PRN 


0052 


6656 


XFROCTi 


1 FROCT 


0053 


6631 


XTOCT, 


TOCT 


0054 


6646 


XCRi,F| 


UPONE 


0055 


0240 


K024B, 


0240 


0056 


0260 


K0260, 


0260 


0057 


0000 


Kg0B0f 


0000 


0060 


»001 




00531 


0061 


2002 


K0002| 


0002 


0062 


0003 


K0B03| 


0003 


0063 


?a04 


K0004, 


0004 


0064 


•'1036 


K0a.56 , 


8086 


3069 


?0a7 


K00a7, 


0007 


3266 


3010 


K0010, 


003,0 


0067 


0020 




00Z0 


0070 


ZB37 




0037 


3071 


»040 


K0040, 


0040 


0072 


0100 




0100 


0073 


0200 


K0200I 


0200 





Vl*2 


2B«APR97S 


0074 


0207 


K02B7» 


B2B7 


007$ 


8400 




0400 


00 7 6 




Kiemi 


1000 


007 7 


2000 




2000 




37T7 




37T7 




4g00 




4080 




7000 


KfBBe, 


7090 




7?T6 


k7?76, 


7776 


01^4 


77f 5 


K7779, 


7773 




7700 


K7780, 


77B0 




7?<0 


k77«B| 


7740 




0070 


K8f 7I«, 


0070 




0i? 7 




Bi77 


Bill 


0377 




0377 


0112 


31f 7 


K0177» 


0177 


0il3 




K2§iif f 




0114 


5252 




526Z 


0115 


3?4B 


KJ74e, 


3740 




3737 


K3737s 


3737 


0117 


7717 


K7717, 


7747 


03*20 


41P0 




4100 






K 7>00 ( 




0122 


5BM 




5000 




57?7 


K^777 I 


9777 


0124 


7774 


K7774, 


7774 


8125 


7771 


k7771i 


7771 


0126 


7777 


K7777, 
/ 


7777 






/ 




0127 


7774 


M4, 


»4 


0130 


7 77 3 




«5 


0131 


7771 


"i7i 


aj 




7764 


KlZ. 


• 12 


0133 


7760 






0134 


7720 


h48s 


,4S 


0135 


7600 


M 1 2 S f 


•128 


B136 


7501 




•%n 


0137 


7401 


h25S, 


• 2»Si 


0140 


7324 


h300> 

/ 


••380 






/ 




01*1 


0017 


K0017, 


00t7 


01^2 


0?15 


Ka219| 


02i» 


01*3 


0212 


K0212. 


02|2 




6201 


KGDF , 


cor 


31*5 


6244 


K!?MF , 


HHf 


01^6 


5403 


K54»3, 


5403 


01^7 


3776 


MTSB!>| 


• TSTi 


CH!0 


0000 


KEGl, 




0151 


3080 




n 


JilSZ 


?0?a 


sacNUi 


0 


3153 


mil 


TCMTHl, 


0 


0154 


0000 


TCNTH2, 


0 
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0195 0000 
01S6 0000 



20(50 



0157 
015B 

0161 13000 

0162 0000 
016S 0000 

0164 i3000 

0165 0000 

0166 3000 

0167 i5000 

0170 0000 

0171 0000 

0172 2000 

0173 0080 

0174 2200 

0175 ?000 

0176 7041 

0200 



0200 5203 

0201 54Z2 

0202 542B 

0203 6224 

0204 3172 

0205 1172 

0206 ll«4 

0207 3210 
7402 

0211 4576 

§212 1173 

BZ13 764B 

0Z14 5217 

B215 1526 

0214 3175 

0217 7604 

0220 0065 

0221 7040 

0222 3173 



TCnTR3| 
TCNtH4, 

/ 

CDREGZ, 

CRRE.G1, 

CRRtG2, 

STHEC, 

D3«t.G, 

CMREG, 

DARtG, 

AO«t.G, 

DTRiG, 

ACRS.G, 

MQMLMA I 

FUOMAXj 

STCOM, 

XSET, 
/ 

»200 



SETUP 



f 

/Srl^UP POINTERS FOR AHOUNT OF E^'TlNoEO 
/BANKS or MEMORY, INTERRUPT SES 



/FttLO 
/ 

BcNi 



PftSftO, 



Vl5E» ?u'"'E^'T 



JHP- 


1*3 


MANUAL 




JOTCKN 








DC* 


HOMEMA 


TAD 


MOHEMA 


TAP 




DCA 


PRSFUD 


Ht! 




JM9 I 


!(SET 


TAD 


rufiMAX 






JMP 


1*3 


TAQ I 


K7777 


DCA 


SAVCND 


u*s 




ANP 


K0007 


CHA 




DCA 


FUBMAX 



re RtOULAR OiAG'JOSItC 
[0 M*NUA|, SCOCE T?ST 
[0 lOT CHANCE ROUTINE 



/MAKE HOMEDF 

/MAKE OF»lF 

/SETUP FIELO 0 

/QET FIRST PASS POtNTe"? 

/IS !T FtRSt l»*SS 

/N8, MUST SE A RESTART 

/GET UAST LOCATION 

/SAVE IT FOR A RESTOtlE 

/MASK 9»11 

/§AVE AMOUNT OP EXIENOlO MEMORY 



//EKIFY TH*T THE OfSK MOTOR IS OFF', THE 
/STATuS RtGlSTER ShOuLD ONLY CONTAIN NOT REAOY TO 
/SEEK, REAP, OR WRITC AND NOT DISK FILE READY, 
/INITlALIiE SHOULD HAVE CUEAREO ALL OTMER SITS 



0223 
0224 
0225 



H50 
1174 
31»0 



OCA REBl 
TAO STCON 
OCA GDREG2 



/GET EXPECTED STATUS 
/SETUP TEST HANDLER 



0226 

0227 4434 



0230 

a23i 



4452 
4487 



0232 44Se 



8253 3226 

0294 'ieee 



0235 4441 

0236 4427 

0237 4430 

0240 3259 

(1241 0006 



0242 4431 

0243 4427 

0244 4430 

0245 3242 

0246 0007 



0247 3160 

0250 4435 

0251 76S0 

0252 4427 

0253 4430 

0294 0250 

0295 4201 



32^6 1174 

0257 3140 

0260 7301 

!«261 444S 

?262 1150 

(1263 4442 

0264 4434 

0265 4432 

0266 4427 



TSTB, 



RpST*T 

NERROR 
ERROR 

Tsra 



PAGE i«4 



/cet t~ 

/READ 
/CHECK 
/kC 0,K 



4^»* LOOPS 



/«eciste"» failed, 
/scope loop pointer 
/text pointer 



QUEAR STATUS 



/VERiFT TH*T SKI? {OMDiTlONS WERE CLEARED 
/By "INITIALIZE" ON START or TEST, 



TSTl. 



NERROR 
ERROR 

TSTl 
0006 



/ISSUE "oSt^P" lOT 

/PSKP e,K', ^"9* LOOPS 

/Skip eoNOfTioNs 
/Scope loop pointer 
/text pointer 



/VEKlrr THAT INTERRUPT REQUESTS WERE 
/CI,EARED BY -INlTULtZt" AT START OF I^ST 

TST2, JONWAT /M WAIT TOR p'T, 

NEHROR /fNT, 8,K, 4?*6 LOOPS 

ERROR /ERROR, "JkilTMLUE" ?l,EAR 

/i^JT-, CON(5!T!0N 
TST2 /SCOPE LOOP POINTER 

00»7 /TEXT POINTEP 

/ 

/VERJf T THAT nOHHAND REGISTER WAS CLEANED 
/By "1'<ITI*LI2E'' At START OF TEST, READ COMMAND 
OMAN" (MAINTENANCI JOII 



TST3) 



/RECtSTER WITH 
/ 

oc* 

RDfMO 
SNA CLA 
NCRROR 
ERROR 

TST3 
4201 



G0REG2 



/S>ETUP compare REOiSTER 
/READ eOMNAND REGISTER 
/AC SHOULD 8t f- 
/AC 0(K, 4?96 LOOPS 
/ERROR, "IMTULiat" CtEAR 
/C6MHAND RrOISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER t 



/VEHIFV That all DRIVES ON cONTHOI, ARE OFF', 

/THE STATyS SHOyLO 8E 2200 WWE*" O^lvE* A^C SELECTED, 



TST4, 



TAu 
OCA 

CL* CLL 

CLRALL 

TAO 

LOCMD 

RUiiTAT 

ACCHPl 

NERROR 



STcON 
G0RE62 
I AC 

REBl 



/tXPEQTCo $t*TUS 
/?ETuP compare REGISTER 
/ENABLF CLEA* CONTROI. 
/OCLR "CLR ALL" 
/UET AC VALi^r 
/l,OAD CO"MAn:" 
/KEAO STATUS 
/fHECK RESULTS 
/0',K, 409* LOOPS 



PAl,10 V142 20.APR«73 
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0267 4430 

0270 0256 

0271 9000 



0272 
0273 

e2M 

8275 
0276 

02»7 
0380 

Bjei 

0302 
0303 



1150 

IHB 
4441 
7000 
4432 
4427 
4430 
?i272 
4010 



0304 31*0 
B305 1150 



B306 
0327 



4443 
4432 



0310 4427 

8311 4430 

0312 2305 

0313 4012 



0314 1150 

0315 4442 

0316 44S2 

0317 4427 

0320 4430 

0321 0314 

0322 4010 



0323 
0324 
0325 
?326 
0327 
0330 
0331 
3332 
0333 



7301 
4449 

1191 
4444 
4432 
4427 
4430 
?i323 
4010 



Error 

TST4 
5000 



/erroRi status 
/scope loop pointer 
/text pointer 



/VERIFT THAT JOT "flSKP" oOfS NOT AFFEfT 
/AC RtOJSTER, TRY AUL COMBINATIONS IN AC. 



TSTSi 



TAO 
DC* 
TAD 

OSKSKP 
NQP 

AgCMPl 

NERROR 

ERROR 

TStS 

40^0 



RE81 

0DREC2 

RESl 



/SET Ac VALVr 
/SE 



SETuP CnMPAk REGISTER 

/ISSUE "PSKP" fOT 

/5HECK AC, gnMPARE TO C0RE82 
/AC 0,»!, 4?'»^ LOOPS 
/ERROR, "08'*'"' CHANGEO ACi 
/SCOPE LOOP POINTER 
/TEXT POINTED 



/VeHIFT THAT fOUC*" tO*D CURRENT AooRfeSS 

/REGISTER GUARS THE AC, TRY ALU SOMBInaTIBNS IN AC 



T5T6, 



ogA 

TAD 

UD5UR 

ACOMPl 

NERROR 

ERROR 

T$t6 

40j;i9 



GORECZ 
RE61 



/SjTUP COMPARE REGISTER 

/GET AC v^ly^ ■ « 

/LSA"^ euBRENf ADDRESS «0LCA« 
/gwECK AC, CPHPAHE TO CfORES2 
/he 0,K, 4PV6 LOOPS 
/ERROR, DLCA CLEAR AC 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VeRIfT THAT «DLDC" 1.0*0 cOHMANc HEOI^fTER 
/CLEARS THE"aC-, TRy ALL COMBINATIONS JN AC* 



TST7i 



TAq 

tOCMO 

ACCMPJ, 

NERROR 

ERROR 

T?t7 

40(0 



REGi 



/gfT Ac value 

/"oldc" load command register 
/check ac, compare to 6dre62 
/ac 0,k, 4p»6 loops 

/ERROR, owe CLEAR AC 
/SCOPE LOQP'POINTER 
/TEXT POINTER 



/VEKIFV THAT "OLAG" CLEARS THE Ac REGISTER'. 
/TRY ALU COMBINATIONS {N AC, 



CL* CLL 
CLKALL 

TAD 

LO*OD 

ACCMPl 

NEKROR 

ERROR 

TSfa 

40|0 



J Ac 

RE02 



/fUE*" CONTROL 
/GET DATA 

/LOAO DISK ADDRESS 
/CHECK RESULTS 
/O'.K, 4096 unOPS 
/ERROR, OL*G. CLtAR A? 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEHIFT THAT JOT "BCUR" CLEARS THE ACi 



PhU^ Vi42 



0334 liS0 

0335 444S 

0336 ««SZ 

0337 #487 
8340 4450 
0341 0334 
8342 4010 



20bAPR»7S 



i!|7 



f>AOC 1»6 



0343 
0344 
0345 
0346 
03*7 
0390 
035i 
0352 
0393 
0354 
0355 
0356 
0357 
0360' 
0361 
0362 
0363 
0364 



0365 
0366 
0367 
0370 
0371 
0372 
0373 
0374 
0379 
0376 
0377 
0400 
04f)l 
0402 
0403 
0404 
0409 
0406 



7301 
4445 
1150 
7110 
7630 
7240 
3160 
1160 
7040 
4442 
1160 
4442 
4435 
44S2 
4427 
44S0 
03«3 
4201 



7301 
4445 
1150 
7110 
7630 
1113 
1113 
3160 
1160 
7040 
4'»42 
1140 
4')42 
4435 
4432 
4427 
4450 
0369 



/TRY AS,!. COMBINATIONS |N AC 

/ 

TSTV, T*D «E8i 

CURAUU 

ACgHPl 
NERRDR 

TSf? 
4010 



. TO ODKCSZ 

WOOPS 
- ^ -"L ' CLEAR AC 
A^uft uOO OINTER 
/feXT POtNTES 



/VERIFY THAT The cOHnano R|0|ST|,R c*f^ SE taAoED 
/AND SHIFTEU INTO THE |.0«|R DATA SUFFER wlTH 
/THE MAINTInaNCE tOT, USE DATA PATTERN 0000 ♦ 7777', 
/ 



TSTIB, 



cu* cut. 

CUKALL 
TAD 

C(.l, RAR 
SZt, CLA 
CW* CM* 
OCA 
TAD S0RtC2 
CMA 
I.05MD 

TAO G0RES2 

I.DCMO 

RPCMO 

ACCMPl 

NERROR 

ERROR 

T5tl0 

4201 



RE61 



GDREC2 



mm "CLR AU" 

/PAT* 7777 ir llUK IS SET 
/SETUP CfMPARE REGISTER 

/ICT COMMAND T! OPOSITE 

/SET COMMANO TO VA1.UE EXPECTED 
/READ COMH*ND REGISTER 
/gwECK RTSU'w'S 
/O'.K, 4096 LOBPS 
/ERROR, CQHRAND R£OSfT£R 
/ioOPi; UOOP POINTER 
/IBXT POINTER 



/VEHJFY that the command RrOlSTtR CAN 8e 1, 0*060 

/ANU SHirTEO INTO THE LOwER ClAT* UUFftN wi?H 

/THE MAINTENANCE ioT, USE DATA PAJTERN 2529 * 5252 

^sTu. CI.A cu ue ,,,, 

RESl 



Cli* CIS. 
CURAU 
TAO 

clC RAR 

SHl, CU* 

TA3 

TAD 

DC* 

TAO 

CM* 

UDCMD 

TAO 

L05MD 

ROCMO 

ACCMPl 

NERHOR 

ERROR 

TStll 



K2525 
K2525 
GORECZ 
G0REG2 



C0REG2 



/OAT* 5292 If LINK IS SET 



/SETUP COMPARE REGISTER 



/SET CSM'^A^JO TB OPOSlTE 

/SET CONWA^JO TO VAI-UE EXPECTED 
/READ COMMAND REGISTER 
/CHECK RCSl'UTS 
/O'.K, 4096 LOOPS 
/ERROR, COMMAND REGISTER 
/SCOPE LOOP POINTER 
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PASE 1»7 



0407 4201 



4201 



/TEXT POINTER 



041B 
0411 



0424 
0425 

B#?7 
0430 
0431 
0432 
0433 
0434 



1151 
4442 



0412 1190 

0413 3160 

0414 1150 

0415 4442 

0416 44S5 

0417 4432 

0420 4427 

0421 4430 

0422 0410 

0423 4201 



0441 
0442 

0443 
0444 



0447 
Z452 

04S1 



1150 
4442 

iisi 

4442 
4445 
44J5 
4432 



0435 4427 

0436 4430 



0437 0424 
0440 4201 



3t6e 

1150 

4442 
7301 



0445 4445 

0446 4435 



7650 
4427 
4430 



?452 0442 
0453 4201 



/VrKIF"' THAT The COMMAND REGIST£R 
/BE tOAOEO AND THEN 3HJFTE0 INTO TME UOwER 
/OAT* HUFF|R, TRY AUt COMBINATIONS, 
/ 

RE82 



TSTIZ, 



TAO 
I.PCMD 
TAO 
OCA 

TAD 

UOCMD 

ROCMD 

ACCMPl 

NEKROR 

ERROR 

TST12 
4201 



RE@i 

GDSE52 

REGl 



/GET Ac VALUE 
/l,9AD COMMAND REGISTtR 

/SETUP COMPARE REGISTER 

/Ua*'? C0HM4ND REGJSTCR 
/READ COs^HlND R£CIST|R 
/CHECK AC, COMPARE TO ^9Hi2 
/AC 0',K, 40»* LOOPS 
/|RROR, LOAD OR READ 
/COMMAND REGISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEHIFT THAT OCLR (JOE? NOT CLEAR 5OMMANO 
/REGISTER WHEN AC10*0 AND AllfS 
/ 

TST13, 



TAo 


RESl 


LDCMO 




TAD 


REG2 


DP* 


G0NeG2 


TAO 


RE92 


LOCMD 








WQCMD 




ACCMPl 




NERROR 




ERROR 




T$Ti3 




4201 





/VEHIFT THAT DCLR 60ES CLEAR cOMMANq 
/REGISTER WHEN ACie»0 ANO ACH»1 

/ ' 

GDREC2 
REGl 



TST14, 



DC* 
TAD 

locmd 

CLA CLL 
CLRALL 
RDCMD 
SNA CLA 

NERROR 
ERROR 

TST14 
4201 



I AC 



/LOAD COMMAND REGISTER 

/SETUP COMPARE R|51STES 

/LOAD COMMAND REGISTCR 
/9CLR "CLR ALL" 
/READ COMMAND RECIST5R 
/5HECK AC, COMPARE TO GDRE02 
/AC O.K, 40»6 LOOPS 
/ERROR, OCLR CLEAR COMMAND 
/REGISTER WHEN ACiBt9 • ACtl'0 
/SCOPE LOOP ^OfNTER 



/||TUP C8HPAPE REGISTER 

/LOAD COMMAND REGISTER 
/^NASUE CLE*'' CONTROL 
/pCLR "CLR AIL" 
/READ COMMAND REGISTER 

/CHECK AC, SHOULD EQUAL « 
/AC 0,K. LBQ^ 

/ERROR, 1CLN CLEAR COMMAND 
/REGISTER WHEN AC10sB*ACll»l 
/SCOPE LOOP POfNfER 
/TEXT POINTER 



/VERIFY THAT DLAG qOES LOAD THE SURFACE *Nb SECTOR 



20»APH»73 



/REGISTER, USE OaTa PaTTE;HN B0 ♦ 37, 



0454 
0455 
0496 
0457 
0460 
0461 
0452 
0463 
0464 
0465 
0466 
0467 
0470 
0471 
0472 
0473 
0474 
0475 
0476 
0477 
0500 
0501 
0502 
0503 
0504 
0505 
0506 



7301 
4445 
ilS2 
3JS3 
1150 
7110 
7630 
7340 
4444 
1166 
0070 
3160 
4437 
1073 
4447 
2153 
5272 
7300 
1067 
4447 
5166 
1166 
4432 
4 427 
4430 
f!454 
4102 



0507 
0510 
0511 
0512 
0513 
0514 
0515 
0516 
0517 
0520 
0521 
0522 
0523 
0524 
05Z5 
05Z6 
0927 
0530 
0531 
0532 
0533 



7301 
4445 
1132 
3153 
1150 
15070 
3160 
1150 
4444 
4437 
1073 
4447 
2153 
5322 
7300 
1067 
4447 
3166 
1166 
4432 
4427 



TST15, 











T A'O 


Mi? 


DC* 


tcntri 


TAD 


RESl 






S2^ Cl,4 






Cn A 


UO*DD 




TAQ 




AND 


K0037 


oc* 


GDREG2 


EN«AN2 




TAD 


K0208 


l,DMAN 




1 Si 


TCNTRI 


JHP 


1 "2 


A CLW 




TAO 


K0a20 






05* 


DAREG 


TAO 


OAREC 


ACCMPi 




NgftROR 




ERKOH 




TST15 









/P,K, 



/ENABUE Ci.?*" CONTROL 

/Clear control 

/setup 12 bit shift counter 



/g*TA 00 * 37n 

/LOAD DISK *00"ESS "DLAG" 

/HiSK EXPEETEO VALUE 
/SETUP COKPACE REGISTER 
/tNTER M4|HTeN*NCE 
/ENA5UE SHIFT ByrFER 
/(.OAO MAlNTtkJANCE 
/COUNT 12 SHIFTS 

/ENABLE f»EAO L.8KE.R BUFFER 
/tSAO MAtNftNANCE 
/?AVE VAlUI FOUND 

/5HECK RESULTS 
4096 LOOPS 

/ERROR, SURFACE AND SECTOR SHIFT 
/SCOPE LOOP POINTER 

/TEXT POINTER 



/VENIFl' THAT plAG LOAqS IH 
/SECTOR RECISTEK, gSE DATA 
/COHBJNATSONSs 
/ 

TST16, 



: SURFACE 
PATTERN All, 



CL* CtL 




CL«ALl 




TAO 


H12 


DfA 


TCNTRI 


TAO 


REBl 


ANO 


K0e37 


OCA 


GDftEC2 


TAD 


RE81 


LDADO 




ENMAM2 




TAD 


K0200 


LOHAN 




IS£ 


TCNTRI 


JHP 


■ »2 


CLA CLL 




TAO 


K0a2? 


1.0MAN 




OCA 


DAREG 


TAO 


DAREG 


ACCMPI 




NERROR 





/ENABL! CL?Al» CONTROL 
/CLEAR CONTKOL 

/SETUP 12 BIT SHIFT COUNTER 

/MASK IXPECTEO VAt.yE 
/SETUP COMPARE REGISTER 

/L9AD OSSK ADDRESS «0|,*S" 
/ENTER MAINTENANCE 
/tWABUE SHIFT LOWER BUFFER 
/LOAD MAINTENANCE 
/COUNT 12 SHIFTS 



/E,NABLE READ LOWER BUFFER 
/U8A0 MAINTENANCE 
/SAVE VALUE FOUND 

/CHECK RESULTS 
/O'.K', 4096 LOOPS 



PAL10 



V142 20iiAPR»73 



PA9E !■» 



0534 4430 

0535 0507 

0536 «102 



0537 
0540 

0541 
0542 
0543 
0544 
0545 
0546 
0547 
0550 
0551 
0552 
0593 
0554 
0555 
0556 
0557 
0560 



7301 
4445 
1150 
7110 
7650 
7240 
3160 
1160 
7040 
4444 
1160 
4444 
4440 
4432 
4427 
44S0 
0537 
4102 



0561 

0562 
0563 
0564 
0565 
0566 
0567 
0570 
0571 
0572 
0573 
0574 
0S75 
0675 
3577 
06H0 
0501 
06W2 
0603 



7301 
4445 
1190 
7110 

7630 
1113 
1113 
3160 
1160 
7040 
4 4 4 4 
1160 
4444 
4440 
'432 
4427 
4430 
-3561 
4102 



ERROR 
TStl6 

41»2 



/ERRORi sgRKiCE AND SECTOR SHIFT 
/SCOPE LOOP POSNTE" 

/TEXT POINTER 



/lot. USE DATA PATTERN 0000 ♦ lUZ -ur ciiaaicr *wn SECTOR 



TST17, 



REGl 



CL* CLL 
CL«ALL 
TAO 
CLL 
SiL CLA 
CL* CMA 
OCA CiO'<EG2 
TAC GDREC2 
CMA 
LOADD 

TAD G0REC2 
I.OAOD 
RDADD 
ACCMPi 
NERROR 
ERROR 
TST17 
4102 



/USE DATA ?777 IF LIW JS SET 
/SETUP COMPARE REGISTER 

/SET DISK ACORESS TO OPPSITE 

/SET DISK ADDRESS TO EXPECTEO 
/READ DISK ADDRESS 
/CHECK RESULTS 

/rRRORfofsK^ADDRESS RfClSTER 
/SCOPE LOOP POINTEX 
/TEXT POINTER 



/ 

TSTIB, 



CL* CLL l*C 
CLRALL 

REai 



TAD 

Ctii f AR 
SZi, CLA 
TAB 
TAO 
DCA 
TAO 
CMA 
LDACD 

TAO G0REG2 

LOAOO 

RDADD 

ACCMPI 

NERROR 

ERROR 

TStlB 

4102 



K2$25 
K2525 
GDREG2 
CDREC2 



/OBLR "CLR AUU" 

/USE DATA 9852 IF WINK JS SET 

/SETUP COMPARE REGISTER 

/SET DISK ADDRESS TO OPOSPE 

/SET DISK ADDRESS TO EXPECTED 

/READ DISK ADDRESS 

/CHECK RESULTS 

/O'K; 4094 LOOPS 

/ERROR, DISK ADDRESS REGISTER 

/SCOPE LOOP POINTER 

/TEXT POINTER 



PAH0 Vl,42 20. APR. 73 



III? 



0604 liSB 

0405 3i*0 

$mi iin 

g607 4444 

0610 4440 

B6il «432 

8612 «427 

0»13 <t30 

0614 0604 

0615 4182 



0616 1150 

0617 316B 

0620 llSl 

0621 4444 

0622 1158 

0623 4444 
06Z4 4443 

0625 4440 

0626 4432 

0627 4427 

0630 4430 

0631 0616 

0632 43,02 



06S3 1190 

0634 Ji»e 

0639 1150 

0636 4444 

0637 7301 

0640 4445 

0641 4440 
8642 4432 

0643 4427 

0644 4430 

0649 !i633 

0646 4102 



/VEKIFV THAT THE OfSK aDORESS etSJSTEK 
/CAN BE UOAUED *M0 SHirTeo INTO THE UPWE" 

/DATA Suffer, try all conbinations ik *c 

/SHIFT THE^SURFACE ANQ SCCtOR ?ROH TH| SUKfACE AND SECtflH 
/REGISTER, SHIFT THE LOWER CTLINOER BITS fHOM THE CHC HESISTeR, 



Tsnv, 



TAO 

oc* 

TSO 
1,0*00 

ACCMPl 

tftNOH 

TST19 

4;e2 



R£8i 
RESi 



/6tT *C VALyE 

/lETuP COMPARE RtaiSTIR 

/tOAO DISK ADDRESS R(5|IT|R 
/RIAD DISK ADDRESS «C6JSTC>» 
/CHECK ACi COHPARE TO 80SEG2 
/*C O.K., LOOP 4IS96 TJUSS 
/ERROR, UOAi) OR "EAO DISK 
/AOORESS RES!|TE« 
/SCOPE ueOP POINTER 
/TEXT POINTER 



/VEKIF^f THAT DCLR ftOCS NOT AFFECT THE SURFACE 
/AND SECTOR kHEN Aei0»a * 
/ 

TST20( 



ACiicei 



TAB 


REOt 


OCX 


G0KEC2 


TAO 


RC02 


t.DADO 




TAO 


REQl 


LOAOO 




CURALU 




ROAOO 




ACSMP* 




NERROR 




ERROR 




TST20 




4102 





/ceT *c value 

/IeTuP 



COHPARE RESISTER 
/AC VALUE I gORPLlHENT OF RE51 

/l,BAD DISK ABO^ESS 

/t,8A0 BISK ADDRESS 

/eeUR "ClR ALU" 

/READ BISK ADDRESS 

/CMECK AC, COMPARE TO 50RE02 

/AC 0,K, l.eOP 40*$ TIMES 

/5RR0R, LOAD OR READ OjSK 

/AOORCSS OR OCi.R CUAR 

/§eOPE LOOC POINTER 

/TEXT POINTER 



/VERIFT THAI "DCUf" OOeSN'T 
/RECISTER when kXU9 * Altft 



CUEAK SUKFAct; ANQ ScqTOR 



/ 

TST21, 



TAD 
OCA 
TAP 
LOADD 

C|,A CLU tAC 

Ci.RALU 

ROAOO 

ACCHPi 

NERROR 

ERROR 

TST21 
4].02 



CC2 
RESl 



/IItup^com^aSe register 
/uoao bisk abdress 

/ENA8UE "CIpR ALL" BJT 

/PCUR "CLR ALL" 

/READ DISK ADDRESS 

/CHECK RESULTS 

/AC O.K. LBOP 4096 

/ERROR; LOAD, "EAOi OR CUEAR 

/u!SK AonREs«; 

/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEKIFT THAT THE CRC C*N Bg LOAQEO BV "oLAq' 
/AND "OUOC", USE DATA PAUERN 000B ♦ 7777, 



PALlf V142 



23. APR. 73 



ll£? 



PACE l«ll 



06*7 

055e 

065i 
0652 
0653 
0654 
8655 
K656 
0657 
0660 
0661 
0662 
0663 
0664 
0665 
0666 
0667 
0678 
B67t 
0672 



0673 
0674 

B675 
0676 
0677 
0700 
0701 
0702 
0703 
07B4 
0705 
0706 
0707 
0712 
0711 
0712 
0713 
0714 
0715 
0714 
0717 



7301 
4445 

1150 

7110 

76se 

7240 
0106 
3160 
7004 
3157 
US? 
4442 
1160 
4444 
4446 
4433 
4427 
4430 
0*47 
6004 



7301 
«445 
1150 
7110 
7630 
1113 
U13 
0106 
3160 
7804 
3157 
1157 
4442 
1160 
4444 
4446 
4453 
44a7 
4430 
3673 
6004 



/THIS WJLL VERtfT THAT THE CRC CAN BE LOaOED 

/BV THE EXTENDED CVUINOE" BIT |N THE ?OMMAND REGtSTtR 

/BV fnE "DUAG" lOT', 

TST22, CL* CLL I^C ^^CLR 



CL* CLL 


I Ac 


CLHALL 




TAD 


RESl 


CLI, RAR 




seu CLA 




CUA CHA 
AND 


K7?40 


OCA 


CDREG2 


RAI, 




DCA 


CDRECl 


TAD 


GDREGl 


LOCMO 




TAO 


C0REC2 


LPADO 




RDCRC 




ACCMP2 




NERROR 




ERROR 




T5t22 




6004 





/MSE DATA 7777 IF I.JNK IS SET 



/SETUP COHPARE HI 1 
/CiNK FOR EXTENDED BIT 
/SETUP COMPARE REGISTER 
/GET DATA 
/UOAO CRC 

/LOAD CRC 
/READ CRC 
/CHECK RESUt,TS 
/O'.K-. 4096 LOOPS 
/ERROR, CRC REGISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VFH'.cV THAT THE CRC CAN BE LO*OE? BV "OLAg" 
/kHQ "DLDC"i USE OiTA PATTERN 2525 ♦ 9252, 
/THIS WILL VERIFY THAT THE CRC CAN BE LOADED 
/8¥ THE EXIENOCO CYLINDER BIT IN THE COMMAND REGISTER 
/BY THE "OLAG* IDT* 
/ 

TST23, 



CL» CLL 




clxall 




TAO 


HEQl 


CLL RAR 




5ZL CLA 




TAD 


K2S25 


TAO 


K|f25 


AND 


K?t40 


DCA 


C0IIE52 


RAL 
0?A 


GORECl 


TAD 


GOREGl 


LOCMD 




TAO 


G0REG2 


LOAOD 




RDCRC 




ACCMP2 




NERROR 




ERROR 




TSt23 




60^4 





/C8LR 

/«8E DATA 9252 If LINK IS SET 



/SETUP COMPARE $ I 
/LINK FOR eXTENOEO BIT 
/SETUP COMPARE RECISTE* 
/fiCT DATA 
/LOAD CRC 

/LOAD eRc 
/RgAO CRC 
/CHECK. RESUUTS 
/O'.K, 4096 LOOPS 
/zkfiQA, CRC REGISTER 
/SCORE LOOP POINTER 
/TEXT POINTER 



/VE«iFT THAT THE C»C CAN BE LOAQEO 8V 'DLAS" 
/ANU OLOC", USE DATA PATTERN ALL COMBINATIONS, 



/THIS Will, VERIFY THAT THE C^C C*N BE i.O*OED 

/SY THE EXTtNOEO cVulNOE" BIT JN THE S'^HN&MO REGfSTg" 

/8>C THE "OCAG" lot', 



0728 




TSTi;4 J 






?72l 


7106 








0722 


7006 




RTl, 




0723 


7B04 




RAl, 




0724 


Udi 




AND 


K7?4B 


0725 


31*0 




OCA 


UUREb<: 


0726 


7004 




RAl, 




07?7 


5157 




DC* 


GORECi 


0730 


U57 




TAD 


GOREOi 


07S1 


4442 








0732 


il60 




TAD 


CORECZ 


0733 


4444 




UPAOO 




0734 


4446 




RDCRC 




0755 


44S3 




ACCMPE 




0736 


44J7 








0737 


44SB 




EftHOB 




0740 


07J0 




TSTE4 




0741 


60^4 




6004 





/6ST Ac VALWE 



/SETUP COMPARE REGISTER 
/\,\W ron EXTENDED BIT 
/SETUP COMPARE REGISTER 
/qa DATA 

/U8AD COMMANn REGISTER 

/UOAO BISK APDRESS 

/HEAD CRC REGISTER 

/5HECK AC, COMPARE TO OORESl 

/AC 0,K. I.BOP <l!»6 

/fRROR, CRC REGISTER l,OA0 BY 

/ei.AG OR DLDC, 

/§eOPE UOOP POINTER 

/TEXT POINTER 



CQRE62 



/VERIFY THAT OCt.« PES NOT AFFECT CRC «EG|8TeR', 

/t.OAO CRC WJTH 3LAS * OUOC'i 



0742 1151 

074J 7ie6 

0744 7086 

0745 7g04 

0746 01B6 

0747 Site 

0750 7ig4 

0751 3197 

0752 115? 

0753 4442 

0754 lliiJ 
0795 4444 
8756 1151 
0757 0114 
0760 444S 
07»i «446 

0762 4433 

0763 44?7 

0764 4430 

0745 ?742 

0766 6004 



TST2S, 



REg2 



G0REG2 

GORECl 
GDREGl 

CDREG2 

RCoa 

K7Vi 



/SETUP COMPARE REGISTER 
/WINK FOR fXTENDEO BIT 
/SETUP COMPARE REGlSTfR 

/(.OAD COMMAND REOJSTfR 

/tOAD DISK ADDRESS 

/PON'T 00 RECAL. 

/OeU" "GlR ALL." 

/READ CRC REGISTER 

/CHECK RESUUTS, COMPARE TO GDREGl 

/AND GOREGt 

/O'.K', 4096 LOOPS 

/iftROR, tOAQ, READ, 5i,EAR CRC 

/REGISTER 

/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEHIFT THAT THE CRC REGISTER IS NOT AFFECTED BV 
/»QtOC", "OSKP"! "DRST", «ROBUP"i OR "OLCA«, 
/ySt DATA PATTERN 2525 * 5252, 
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PASE l<il3 



0767 


7301 


0770 


4445 


0771 


1150 


0772 


7110 


0773 


7630 


0774 


1113 


077 5 


1113 


0776 


0106 


0777 


3160 


1000 


7004 


1001 


S157 


1002 


1157 


1003 


4442 


1004 


1160 


1005 


4444 


1006 


1151 


1007 


4454 


1010 


1151 


1011 


4441 


1012 


7000 


1013 


4450 


1014 


1191 


1015 


4443 


1016 


1151 


1817 


4442 


1020 


1150 


1021 


4421 


1022 


4446 


1023 


4433 


1024 


4427 


1025 


4430 


1026 


0767 


1027 


6004 



TST26, 



1030 
1031 
1032 
1033 
1034 
1035 
1036 
1037 
1040 
1241 
1042 
1043 
1044 
1045 
1046 



7301 
4445 
3160 
1150 
4444 
1077 
4442 
1151 
4444 
4440 
4452 
4427 
4430 
1030 
4102 



CW* CLU 

CU^ALL 

TAO 

CLl, R*R 
SiSl, CLA 
TAO 



lAj 
REGl 



TAO 
AND 
OCA 
RAW 
OCA 
TAO 
UOCMD 
TAP 
UOAOD 
TAD REG2 
ROSTAT 
TAQ 
DSKSKP 
NOP 
RDBUF 
TAO RtG2 
UBCUR 
TAO 
UDCMO 

ta5 

LDBUF 

HDCRC 

ACSMP2 

NERROR 

ERROR 

TST26 

6004 



K2525 
K2525 
K7740 
GDREG2 



GORECl 
GORECl 

G0REC2 



HEa2 



RE82 
REOt 



/PCtR 



/WlE DATA 5252 IF WINK JS SET 



/SETUP COHPA^E REGISTER 
/CiNK ro» EXTENDED BIT 
/SETUP CCHPAI^E: REOISTE" 
/GET UPPER 04TA 
/COAD COMMAND 

/WOAO DISK ADDRESS 

/READ STATUS 

/"SSKP" 

/READ BWfFEH 

/W9AD CURRENT ADDRESS 

/WOAO COHHAWn 

/W6AD UPPEP ByPFER 
/RgAO CRC REGISTER 
/5HECK RESUWTS 
/O'.K', 4094 WOOPS 
/IRROR, CRC RESISTER 
/leOPE LOOP POINTER 
/TEXT POINTER 



/VfHir^ THAT 
/WHtN JT 
/ 

TST27, 



WRITE W0C« INHIBITS WOAD *DD«eSS 



II SET, 




Cw* CLl. 




CWRAIL 




DCA 


GORCCi 


TAD 


RESi 


WOADD 




TAD 


K2300 


UDCHD 




TAO 


RE82 


l,0*DD 




RDAOD 




ACgMPl 




MEHROR 




ERROR 




TST27 




«IH2 





/CLEAR CONTROW 

/SeTUf COMPARE REGISTER 

/SIT Ae VALUE 

/U6AD DISK ADOPESS 

/SET WRITE WOCK 

/GET AC VAtyE 

/TRY te LOAD DISK ADDRESS 

/READ DISK ADDRESS 

/CHECK RESULTS 

/O'.K, 40'>6 LOOPS 

/ERROR L0A8 DISK ADDRESS 

/SCOPE LOOP POINTER 



/VERp V THAT THE OfSK ADDRESS Rt5lSTE« IS NOT 



P*Ui«l VX42 2B.APH-73 il£7 

/»rrtcTED BY "oclR". "0WS*"» "ORST"f "OLOe". "OSKP" 

IBS* Bi2s *N? "^sn? ^^^j^ seciSTER 

18*6 1151 J?°,,„ """^ /1.0A0 eUMlHf ADDRESS 
ill? if4t 0^°*KP 

tr63 nil h'?TAT /head status 

1067 !!!! TLRAu'' /CLEAR STAtyS 

IB^a Irian fISK ADDRESS 

1871 4440 /CWECK AC, 50MPA«t TO OORfQ? 

1072 M32 ^CCMPl I 4e»» LOOM 

1074 44S0 ERROR /SCOPE UOOP POINTED 

1075 1047 TSIze I POINTER 
1B76 4102 *10Z 

/VEHIFV THAT THE QflMMANO RtGtSUR 1$ NOT *PrECT|0 BY 
/-OuCR", -OUCA", *6RST-, "OUAC-, "OSKP", OR "ROSUf", 

/gst DATA Pattern ali. conbimaTJOnS, 

1077 7501 'tsT2», CIJ CU I*C /;,:CAR CDNTROt 

ilM sr., /SET *C VALUE 

nil Icl GD««2 /lETUP COHRARE RE6I5TBR 

[III luina /UBAD O0MH*N0 REOlfTeR 

loiDD /UOAO DISK ADDRESS 

li'l "^'^ /(,8AD CURRENT ADDRESS 

JJJ? till t2|- REnZ 

MS5 ROiT*T '«e*" "ATU5 

lU' lt»l i'iLf- ""^ /I.9AD UPPER RUPFER 

iu7 nlZ /5eA0 LOWER RUPfER 

ct^Aul:' /clear STATUS 

1122 ^.h^ALL' ■ /KECALIBRAT^ 

U23 4445 CLKAU |Jp „^„^nO RESJSTER 

UZ« '°5H0 /g^EcK AC, COMPARE TO GDREOa 

11Z5 4452 ACCMPl 
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i(i7 PABE 1»15 



11.26 



4427 

*4SU 



1130 1077 

1131 4201 



1132 
H3S 
11S4 
1139 
1136 
1137 

ll*! 
1142 
1143 
1144 
1145 
1146 
1147 
1150 
1151 



7301 
4445 

4436 
7326 
4445 
73?6 
4445 
J160 
1190 
4442 
4435 
4432 
4487 
4430 
1132 
4201 



1132 
1153 
1154 
1155 
1156 
1157 
1160 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1170 
1171 
1172 



7301 
4445 
4436 
1150 
31*0 
11»0 
4444 
7326 
4445 
1151 
4444 
4440 
4432 
4427 
4430 
1152 
4102 



1173 
1174 
U75 
1176 
1177 
1Z00 
1201 



7301 
« 445 
tlS0 

3160 

4447 



NERROR 
ERROR 
TSt29 
4201 



/Ae 0,K, 48*6 LOOP? 
/erroRi command RE619TER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VERJFT THAT RECALIBRATE INHIBITS LOAy COHMAND 



/ 

TSTJBi 



CLA CLL lAC 
CLRALL 
ENMANl 

CLA CLL CMl R7L 
CLRALL 

CLA CLL CML RTL 
CLRALL 

OCA G0REC2 

TAO RE81 

LOCMD 

RQ5M0 

ACCMPl 

NERROR 
ERROR 
TSt30 
4281 

/VEHIFY THAT RECALIBRATE JNHlBlTS 

/LOAD DISK ADDRESS OLAG 
/ 

TSTJli 



CL» CUL I*C 
CLR*UL 
ENMANl 
TAO 

OCA 
TAD 
LOAOD 
CLA CLL CHL RTL 
CLRALL 



RE91 

GDREC2 

GDRE62 



TAO «Efl2 
LOAOD 
ROADD 

ACCMPl 
NERROR 
ERROR 
TST31 

♦ 1B2 

/VEHIFY THAT "QMAN" ( MA 1 NTENANCL ! OOE* 
/AFFECT AC WHEN ACS'B AND AC7«1 OR 0, 



/ENABLE CLEAR CONTROL 
/CLEAR CONTROL 
/ENTER MAINTENANCE 
/ENABLE RECALIBRATE 
/RECALIBRATE 
/ENABLE RECALIBRATE 
/RECALIBRATf: 
/SETUP COMPARE RESISTER 

/TRY TO LOAD COMMAND 
/READ COHMANn 
/CHECK RESULTS 
/O'K, 4096 LOOPS 
/S^^ROR, IDLE (1> 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/enable ct.e*r control 
/CCEar control 
/inter maintenance 
/get ac value 
/setup compare 

/load disk address <gl*gj 

/INABLE RtCAL", 
/RECALIBRATE 

/LOAD DISK ADDRESS {Oli»0> 
/READ DISK ADDRESS 
/CHECK RESULTS 
/O'K', 4096 LOOPS 

/%knhn ON INHIBIT 

/SCOPE POINTER 
/TEXT POINTER 



TST32, 



CL* CLL l*C 
CLRALL 
TAO 



AND 
DC* 
TAO 
LDMAN 



RE51 
K3737 
GDREC2 
GDREC2 



/CLEAR ENABLE BIT 
/acLR "CLR AtL" 

/MASK OUT « 

/SETUP COMPARE REGtSTER 
/LOAD MAINTENANCE "OMAN" 



PklX'S V},42 



i£7 



PAGE 1«16 



1802 
1203 



«4S2 
40115 



ERROR 
TST32 

/ 

/VEKifV THAT 
/AC7«B AND AC0 



OMAN" DOES NOT ArrtfT At 

1 o« e', 



1207 


75ai 


T5Ti3, cli* cuu 


I*C 


1210 








1211 


ilSB 


TAO 


REOi 


1212 


«li7 


AND 


K77i7 


1213 


3160 


ogi 


COKECZ 


1214 


1160 


TAD 


CDKECZ 


1219 


4447 


l,OHAN 




1216 


4432 


ACCMPl 




Uir 




NEHROR 




1220 


<430 


ERROR 




1221 


1207 


T$t33 




1222 




4dle 





/VENir^ TH»T 
/OCl,« NOT By 



"D«»N" ONUT GETS cUE*fEO 
ANOTHER OMAN, 



1223 


7301 


TST34, CL* CLI. 




1224 


4445 


CURALL 




1225 


U5e 


TAO 


RESl 


1226 


3160 


OCA 


GORECZ 


1227 


1150 


TAO 


RESl 


1230 


4442 


UOCMD 


m 


1231 


1132 


TAO 


1232 


3153 


D?A 


TCNTRl 


1233 


44S7 


ENHAN2 




1234 


1075 


TAO 


K0400 


1235 


4447 


LOman 




1236 


2153 


S$i 


TCNTRl 


1Z37 


52S5 


JHP 




i24B 


7300 






12*1 


4447 


tOHAN 




12*2 


1B*7 


TAO 


1243 


4447 


^DMAN 


OSKEC 


1244 


3114 


OCA 


1245 


1164 


TAD 


OBKEG 


1246 


4432 


AC5MP1 




1247 


4427 


NERROR 




1250 


4430 


ERROR 




12SI 


1223 


TSt34 




1292 


4405 


4409 





/(NECK ACi CRMPa«£ TO 00Rt82 
/AC O'.K, 4>«6 LOOP? 
/ERROR, "CAN" ArPfCTEO AC 
/SeOPE too • POINTER 
/TEXT >0!N'£R 



/CLE*" ENARUE Bit 

/QCUR "CLR ALL" 

/GET AC VAUyE 

/MASK BUT BIT T 

/SETUP COMPARE REGISTER 

/W9A0 MAtNT^MANCt 

/CHECK AC, COMPARE TO O0RE8Z 

/AC 0,K,, 4896 tOOPS 

/ERROR, OMAN APFECT AC 

/iUOPE LOOP POINTER 

/TEXT POINTER 



/gi;EAR enA9ue BfT 
/PCUR "CUR AUU" 

/SETUP COMPARE RE5JSTER 

/LOAD COMMAND REGISTER 

/NO, OP SHIFTS 

/ITORE IN COUNTER 

/ENTER MAlMtENANCE MOQE 4. 0B4»i 

/GIT ENABLE COMMAND REG, 

/(.BAD MA!NT|NANCE 

/COUNT ♦ 8HJFT 12 



/"BMAN" TRy TO CLEAR MAIN PLOP 
/ENABLE SIT FOR RfAO ByFFER 

/RrAO BurriK 

/SAVE FOR PRINTER 
/CHECK AC 

/ie 0,K, 41f96 LOOPS 
/£RROR, «A!N FLIf* Fi.gP 
/SCOPE LOOP POINTER 



/vErIFV that "OMAN" GETS CLEArEO 8y OCLr 
/"CUR AUL" 



1253 7301 TST35, CLA CUL lAC 



PAUif V142 



28«APR»73 



ll£7 



PACE 1»17 



1254 
1255 
1256 
1257 
126B 
1261 
1262 
1263 
1264 
126!S 
1266 
1267 
127a 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
13fi0 



4445 
1847 
3160 
1152 
4442 
1132 
3153 
4437 
1075 
4447 
2153 
5255 
7301 
4445 
1067 
4447 
4432 
4427 
4430 
1?53 

4010 



1301 


Till 


13P'2 


4445 


1333 


1150 


1304 


7110 


1305 


7630 


1386 


7340 


1307 


3160 


1310 


1160 


1311 


P141 


1312 


H57 


1313 


1133 


1314 


3153 


iS15 


4436 


1316 


use 


1317 


7104 


1320 


7061 


1321 


liT* 


1322 


4447 


13Z3 


2153 


1324 


5322 


X3Z5 


4446 


1326 


4433 


1327 


4427 


1330 


4430 


1331 


1331 


1332 


S034 



CL«AUL 




TAO 


K082e 


DC* 


GDREG2 


TAa 


RESl 


UDCMD 




TAO 


Mig 


OCA 


TCNTRl 


ENMAN2 




TAO 


K0400 


UDMAN 




ISi 


TCNTRl 


JHP 


."J 


CU* CLU 


I AC 


CL«ALL 




TAD 


K0020 


UOMAN 




ACCMPl 




neSror 




ERROR 




TST35 





/OCUR "CUR aUU" 

/SETUP COMPARE REGISTER 

/U9A0 COMMANO REGISTER 

/SWIFT IZ COUNTER 

/5;nTER MAINTENANCE MODE * 0B4il 

/LOAD MAINTENANCE "OMAN" 

/IZ COUNT 

/CLEAR ALL "OCLR" 

/LOAD MAINTEMCE 

/CHECK AC, COMPARE TO GDRE62 

/AC 0,K, 4Ptf6 LOOPS 

/ERROR, OMAN AFFECTED AC 

/SCOPE LOOP POINTER 

/TEXT POINTER 



/VEHIFV THAT "AC10 D^TA" 
/CR? REGISTER, THEN READ 
/TRY ALU I'S AND ALU a'S 
/ 

TST3»i 



CAN Be SHlfTfeO TO 
CRC REGISTER", 





I AC 


Ci,«ALu 




TAO 


REOI 


CUL «AR 




S«L CUA 




CLA CUL 




DCA 


GOREGZ 


TAO 


CDREG2 


ANO 


Kiev 


OCA 


GOREGl 


TAO 


Mlft 


DCA 


TCNTRl 


ENMANl 




TAO 


REQl 


CLL RAL 




AND 


K0002 


TAO 


K1000 


UDMAN 




ise 


TCNTRl 


JMP 




ROCRC 




ACCHP2 




NERROR 




ERROR 




TST36 




60^4 





/OCLR "CLR ALL" 



/SKIP IF AIL 0IS DATA 

/AUL ONE'S UATA 

/SETUP COMPARE REGISTER 



/SCTUP COMPARE REGISTER 

/^HlFTER FOR CRC 
/ENTER MAINTENANCE MOPf 



/LOAD MAJNTE^A^JCE 
/16 COUNT 

/READ CRC REGISTER 
/COMPARE RPSULTS 
/AS O.K. 4!'«6 UOOPS 
/ERROR, CRT, REGISTER 
/SCOPE UOOP POINTER 
/TEXT POIN-'EB 



/VEHIFT THAT "Ac 10 DATA" cAN BE SHIFIEO TO 



PAtia Vi42 2(!.APR«73 lit? 



/C^C NE5S5TER, THEN RE*D C*'C «ECl|>tEH, 
/TRY PATTeKN "iZSgSZ" 



13J3 


7301 


TSTjr, 


CI* CLl, 


UC 


1334 


44 45 








t33S 


1114 








1336 


3140 




DC* 


U U N t. V £ 


1337 


1160 




TAO 


GDREGS 


1340 


8141 




i^ND 


KBgl7 


13'*l 


3U7 




OCA 


ODSECl 


13^2 


1133 




TAD 




1343 


3193 




DC A 


TCNTRl 


1344 


4436 








13*9 




Ti7H, 


CI.A CLL 




i346 


IIS3 




TAO 


TCNTRl 


i347 


7B04 




RAL 




13S0 


3041 




AND 




1351 


1B76 




TAD 


K1300 


13*2 


4447 




LDMAN 




1353 


2153 




l$» 


TCNTRl 


1354 


5345 




JHP 


T37R 


1355 


4446 




RDCRC 




1356 


4433 




AC§HP2 




1357 


4427 




NERROR 




1360 


4430 




ERROR 




1361 


1333 




T5t37 




1962 


6004 


/ 


6004 




1363 


5764 




JMP t 




1364 


1400 


/ 


TST38 






1400 









/OCUR "CLR ALL" 

/SETUP COMPARE RE61STER 

/SETUP COMPARE REQISTER 

/SETUP 16 COUNT 

/ENTER MAINTENANCE MODE 



/SETUP DATA RIT 
/ENABUE RITS 
/COAO MAINTENANCE 

m COUNT 

/READ CRC RE8ISTER 
/5HECK RE5UUTS 

/AC 0,K, 4e»6 LOOPS 
/ERRORi CRC REGISTER 
/fOOPE LOOP POINTER 
/leXT POINTER 

/T8 NEXT Te?T 



/VtHifT THAT "Acie D»Ti" QAN 8e SHJFTfcD 
/TO CRC REGISTER, tHEN R|AO CRC R|0|SlfR, 



/THY HATTEH "05i;b25.i 
/ 

1400 7301 TST38, cl.* CLl I*e „ « „ 

t4Bi 4445 CLRALL /CLEAR AUL "OCRL" 

1402 1113 TAP K2525 



PALlf 


V142 


20. APR* 


73 


1117 


14BJ 


3160 




OCA 


C0REC2 


1404 


. 1160 




TAO 


GPRECZ 


1405 


!^141 




AND 


K0017 


1406 


3157 




DCA 


GDREOl 


1407 


HS3 




TAO 


Ml« 


1410 


3153 




DCA 


TCNTRl 


1411 


4436 




ENMANl 




1412 


7300 


TSflK, 


CUA cut 




1413 


115J 




TAD 


TCNTRl 


1414 


7044 




CMA RAL 




1415 


0041 




AND 


K0002 


1416 


1076 




TAO 


K1000 


1417 


4447 




LOMAN 




1420 


31^3 




IS! 


TCNTRl 


1421 


5212 




JMP 


T38R 


1422 


4446 




ROCKC 




1423 


4433 




AgC»P2 




1424 


4427 




NERROR 




1425 


4430 




ERROR 




1426 


1400 




TStiS 




1427 


6004 


/ 


6004 





PACE 1«19 



/SETUP COMPARE RECISTE«I 



/SETUP COMPARE REClSTgR 



/i* COUNTER SHIFTER 
/ENTER MAINTENANCE MODE 



/SETUP "AC 1«» OATA" 
/tNABUE RJTS 
/LOAD MAINTEVANCE 

/14 COUNT 

/READ CRC «Er,ISTER 
/?MECK RESUs'S 
/O'.K, 4096 LOOfS 
/ERROR, CRC RESISTER 
/SCOPE LOOP POINTER 
/TgXT POINTER 



1430 7321 

1431 4445 

1432 1190 

1433 31*0 

1434 1190 

1439 0141 

1436 3197 

1437 7301 

1440 3193 

1441 il33 

1442 3194 

1443 4436 

1444 1190 

1445 0153 

1446 7640 

1447 1041 
1490 1076 

1451 4447 

1452 7300 
1493 1H3 

1454 fedA 

1455 3193 

1456 7630 

1457 5254 

1460 2154 

1461 5244 



/ 
/ 

/VEHIFT THAT ''AC10 0*TA'' jAN Bg SHIfT^D TQ cRC 

/REGISTER, TRy ALL COMBINATIONS, 

/ 

TST3», 



Ci.* CLU 


1*6 




CLRALL 


/PCLR "CLR ALL" 


TAQ 


RE61 


/SET'JP COMPARE REStSTER 


D?A 


CDREC2 


TA5 


REGl 




AND 


K0Bi7 




D?A 


CDHEGl 


/SETUP COMPARE RE6ISTER 


CIA CLL 


lAC 


/SETUP BIT MASKER 


OCA 


TCNTRl 


TAO 


Hi* 


/?eTuP riRST SHIFT COyNTER 


DC* 


TCNTR2 


ENMANJ. 


/ENTER HAINTCNANCE MOOl 


TAD 


RE81 




AND 


TCNTRl 




Si* CLA 




/SKir IF 0 


TAO 


K0002 


/WAS A 1 


TAD 


Kie00 


/|NA8l,E BITS 


LDMAN 




/tOAO MAINTENANCE 


CLA CLL 






TAO 


tcmtri 








/ROTATE RIT MASKER 


CCA 


TCNTRl 


/HAIT FOR FIRST L|NK THEN 


so. CL* 




JMP 


i«3 


/RESET BIT It IN MASKER 


!S2 


TCNTR2 




JMP 


TSeR 


/l,BOP SACK 


RDCRC 




/READ CRC RieiSTER 



146J 4433 

t454 442? 

1465 44S0 

1466 1430 

1467 6B04 



ll£7 



i^"0 

14: 4 

14 -6 

14 7 
lS-0 

15 '1 
IS '2 
19 'S 
IS -4 
|5:-5 

i5i^7 
1510 
ISli 
1912 
151S 
1914 
1915 
1516 
153 7 
l§23 
iS21 
1522 
1523 
1S24 
1S25 



7301 
"445 

3160 
3197 
7301 
33.53 
1133 
3J.54 
4436 
1151 
0153 
7640 
1041 
Wfi 
4447 
7300 
1153 
7Z84 
3153 
76S0 
5911 
2154 
5301 
4444 
4446 
44S3 
4457 
44S0 
1470 
6004 



1526 7301 

1527 4445 

15321 1192 

1531 7110 

1532 7650 

1533 7240 

1534 3160 

1535 1160 

1536 4421 

1537 4450 



ERROR 
TSTJ9 
6B§4 



/CHECK RESUI.TS 
/g',K, LOO'S 
/ERROR, CRC REGISTER 
/gRROR, CRC REGISTER 
/TEXT POINTER 



/VrRIf That "oLAG" ci.E*''S *LL Or The 
/CRC REGJSTtR, TRv ALL COMBINATIONS IN CRC, 
/ 

TST40, cU* CLU 5*C 

G0REC2 
GDRECl 
I AC 

TCNTRl 
"1* 

TCNTR2 



T40Ri 



DC* 
DC* 

CU* CLl, 
DC* 
TAD 

oci 

TAO 
»N0 

TAO 

TAO 

CI.* CLL 
TAO 
RAl, 
DC* 

Siw CUA 

ISi 
JMP 

LOAOO 

ROCRC 

ACCMPZ 

MERROR 

ERROR 

TST40 

6884 



/SETUP COMPARE RECjSTERS 
/SETUP BIT MASKER 



REG2 
TCNTRl 



Ka002 
KiaBe 



TCSjTRl 
TCNTRl 
,»S 

TCNTR2 
T4gR 



/SETUP rjRST SHJFT CPywTER 
/fMTER M*lNtEN*NCE MODE 



/SKIP IF 8 
/»*S A 1 
/CNABUE BITS 
/tOAO MAINTtNANCE 



/ROTATE PIT MASKER 

/WilT ro» r|RST LJNK THEN 
/RESET SIT li !N HASKER 

/L80P SAeK 

/W8A0 OtSK ADDRESS AN? CUEAR CRC 

/READ cue REGISTER 

/CHECK RESULTS 

/g'K', ««96 UOOPS 

/6RR0R, CRC RE81ST5R 

/ERRORi CRC RCSISTtR 

/TEXT POINTER 



/VEHIF* TMAT «Acl0 DATA" qAN BE SHIFTED TO 
/yPPER DATA BUFFER THEN SINK TO 1.6wEH OATA 
/SUFFER, TRY AUU i'S AND B'S, 
/ 

TST41, CWA CLU 1*6 ,-„r.R. 

CURAUL /"OCLR* 



"CLH AIL' 



TAD 

C\.i RAR 

Sit, CLA 

CLA CMA 

DCA 

TAD 

LDBUF 

R08UF 



RE61 



G0REG2 
C0REC2 



/CET VALUE TO LOAD 
/LOAD UPPER BUFFER 
/READ LOWER BUFFER 



'Al.10 V142 2a«APR.73 itJT ''AOE l«8l 



1540 4432 

1541 4427 

1542 44J0 

1543 lt>26 

1544 4405 



15*5 7301 

1546 <4«3 

1547 1150 

1550 7110 

1551 7630 

1552 1113 

1553 U13 
1994 3160 

1555 1160 

1556 4421 

1557 4450 

1560 4452 

1561 4427 

1562 44JS 

1563 1546 

1564 4405 



ACCMpi 

NEMROR 

ERROR 

TST4i 

4405 

/ 

/VEHiFT THAT "AfilZ DATA" i 
/yPPEK Q*TA BUFFER THEN 5 
/SUFFER, THY PATTERN 252» 

/ 

TST42, 



/5HECK AC, CpKPARE TO C0rE02 
/AC 0,K, 40y6 LOOPS 
/ERROR, DATA REGISTERS 
/SCOP LOOP POINTER 
/TEXT POI»<TER 



;*N BE SHiFTfD TO 
[NK TO UOwER DATA 
* 5252 



CL* CLL 




CI.RALL 




TAP 


RE81 


CLl, RAR 




Sii, CLA 




TAB 


K2525 


TAO 


K2529 


OQA 


S0RCi;2 


TAO 


C0REG2 


|,DBUF 




RDBUF 




ACCMPl 




NERROfi 




ERROR 




TST42 




44B5 





/«OCKR'' "CLR ALL' 



/WHAT OATAt??? 
/DATA 5292 

/SETUP COMPARE REGISTER 
/GET VALUE TP LOAD 
/LOAD UPPER SUFFER 
/READ LOWER rJATA BUFFER 
/fHECK AC, CPHPA«C TO GDRES2 
/AC 0,K, 4?I96 LOOPS 
/ERROR, DATA BUFFERS 
/SCOPE LOOP POINTER 
/TEXT POINTER 



1569 
1566 
1967 
1570 
lS7i 
1572 
1573 
1S74 
1575 
1576 
1577 
1600 



7301 
4445 

1151 

3140 
11*0 
4«l 
445B 
14 32 
4*27 
4 130 
l'>65 

4405 



1601 7301 

1602 4445 

1603 1150 

1604 3160 
16B5 1150 
1606 4421 



/VEHSFTY THAT "Acl0 0*TA" C*'^ 
/UPPER DATA BUFFER THEN SINK TO lNER 



HirlED T8 

, „ ...... . -,'tlt" ' 

/DATA BUFFER, THY ^IaTTERN ALL COMBINSIIONS 



/ 

TST43, 



CLA CLL 
CLRALL 
TAD 
DCA 
TAD 
L08UF 
ROBUF 
AQOMPt 
NCRROR 
ERROR 
TSt43 
4405 



RE62 

GDREG2 

CDREC2 



/"nCLR" "CLf< ALL" 
/SET VALUE TO LOAD 
/SETUP COHPARE REGISTER 
/feT IT 

/LOAD UPPER BUFFER 
/RgAO tOWE» CAT A SUFFER 
/CHECK AC 

/AC O.K. 4?V6 LOOPS 
/ERROR, OATA REGISTERS 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEHIFT THAT "AclB DATA" jAN BE SHIFT^p 
/TO UPPER DATA BUFFER THEN SINK TO LOkER 
/DATA BUFFER, THY jLL COMBINATIONS, 
/ 



TST44, 



CL* CLL lAc 
CLRALL 

TAD REGl 

DCA GDREG2 

TAO RESl 
LDBUF 



/SETUP COMPARE REGISTER 
/SET VALUE TO LOAD 
/(.SAD UPPER BUFFER 



1607 *45B 

1610 4432 

1611 **i7 

1612 *4S0 

1613 1681 

1614 4409 



1615 

1616 
1617 

i6ze 

1621 
1622 
1623 

1624 
16ZS 
1626 
1627 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
154(2 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1690 
1651 



1652 7301 

1653 4445 

1654 llSl 

1655 3140 
1696 1127 
1657 3153 

1660 1160 

1661 4421 
1652 2153 

1663 5260 

1664 1150 



20.4PR.73 



i!£7 



OAOe 1*22 



*C5mp1 

NE«ROR 

ERHOR 

TSt4« 

4405 



/chetk Compare to nonl^z 
/ . ■ . 4fty6 LOOPS 
/f-. . -lAfA f!ECISTC«S 

/TEXT ^OINTf* 



/VtRlfV TH*T ALU DiT* BUfF|RS B*N Be FULU 
/AT ONCE, TRY *UU COMBINATIONS 



73«l 


TST49» 


cu* cut. 




4445 




CUWALL 




ll»0 




TAO 


RESI 


3156 




OfA 


TCNTR4 


1127 




TAD 


M4 


3155 




OCA 


TCNTR3 


1156 


T45K1, 


TAO 


TCNTR4 


4421 




uOBur 




7301 






i Ag 


1196 




TAD 


TCNTR4 


3156 




DC* 


TCNTR4 


2155 




iSi 


TCNTR3 


9223 






T4SR1 


1190 




TAD 


RE81 


3160 




05* 


0DREG2 


1127 




TAO 


M4 


3155 




DC* 


TCNTR3 


4450 


T45Ha, 






4432 




ACJHPl 




7610 




SKP CI.A 




5247 




JMP 


T4SE 


2160 




15* 


C0RC(2 


7000 




NOP 




2155 




isi 


TCNTR3 


5236 






T49R5 


4427 




NERROR 




4430 


T45E, 


(RKQR 




1615 




TS!49 




4409 




4405 





/OCUR "CUR AUl" 

/geuMTgs f CK * OF sgrrtRS 

/LOAD UPPER PyPFER 

/4 COUNT, SKIP WHEN syrFERS FULU 

/feTuP roR riRST cnmpare 



/READ BUFFER 

/gwECK 

/0',K", CHECK H^t 

/IRROR DATA BurrcN^ 



/O'K, 4g«6 UCOPS 
/ERROR, DATA SUFFERS 
/SCOPE LOOP POfNtER 
/TEXT POINTER 



/VEKIFT THAT THE SfUO BUFFERS ARE NOT ArFKeTEO 8V 
/"OCLfi". "OUAC", "OtDC, "OLCA", "OSKP", BR "ORST" 

/USi DATA PATTERN ILL SOMBINATIONS 



jOTS, 



TST46, 



T46AI, 



CL* CLL 

CI. "ALL 

TAO 

OCA 

TAD 

OCA 

TAD 

LDBUr 

ISi 

JMP 

TAO 



RES2 
CDREC2 

H4 

tcntri 

GDREG2 

TCNTRl 

T44A1 

REOl 



/OCLR 

/SETUP COHPARE REGISTER 



/Counter foR amount 

/GET VALI.^E TO LOAD 
/LOAD UPPEP PUFFER 
/CBUNT AMOUNT 
/MORE TO LOAD 



OF BUrFERS 



PALia. V142 



2e«APR>73 



1117 
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1655 4444 

1665 1150 

1657 4443 

1670 use 

16'1 3100 

1672 4442 

167S 1150- 

1574 4441 

1675 7000 

1676 4434 

1677 7300 
1730 4445 

1701 1127 

1702 3153 

1703 7300 
1784 1067 

1705 4447 

1706 31*4 
1727 1164 

1710 4432 

1711 7610 

1712 5316 

1713 2153 

1714 5303 

1715 4427 

1716 4430 

1717 1»92 
172B 44B5 



1721 3153 

1722 7301 
17Z3 4445 

1724 11S3 

1725 3160 

1726 1153 

1727 4421 
1738 4490 

1731 4432 

1732 7610 

1733 5342 
1754 U93 

1735 7104 

1736 7450 

1737 7201 
17«e 3193 

1741 4427 

1742 4430 
17«3 1722 
1744 4405 



T46A2| 



LDADO 




TAD 


REOl 


UDCUR 




TAO 


HEGl 


AND 


K3777 


LOCMO 




TAP 


RESI 


OSKSKP 




NOP 




RPSTAT 




CLA CLL 




CLRALL 




TAO 


M4 


OCA 


TCNTRl 


CLA CLL 




TAD 


Kee20 


LO«AN 




CCA 


OBREG 


TAO 


DBREC 


ACgMPl 




SKP CLA 




UHP 


T46E 


|S2 


TCNTRl 


JMP 


T4«A2 


NERROR 




ERROR 




T5T46 




4405 





T46E, 



/vrKir* THAT THE U^PfR BUFFE" C*N 

/THEN sjNK to loher buffer, use * 

/1<S PATTERN, 



/Lqad oisK address 

/load current address 

/mask off write 
/load command recister 

/PSKP 

/READ STATUS 

/CLEAR STATUS 

/SETUP COUNTER 

/ENABLE RCAO BUFFER 
/DMAN 

/SAVE RESULTS 

/CHECK RESIJL"'S 
/OATA O.K, 
/ERROR 

/HEAD ALL FOUR 
/LOOP 

/O'K, 4096 LOOPS 
/^RROR, BUFFER AFFECTED 
/?eOPt LOOP POINTER 
/TEXT PO!NTS;P 



Be uo*d|o 



T5T47, 



T47t, 



DC* 

CLA CLL 

CL«ALL 

TAO 

OCA 

TAO 

LOBUF 

RQBUF 

ACCMPl 

SKP CUA 

JMP 

TAD 

CLL P*i. 
SNA 
lAC 
OCA 

NERROR 
ERROR 
TSt47 
4405 



TCNTRl 

TCNTRl 
O0REC2 
TCNTRl 



T4tE 
TCNTRl 



/?TART AT 0 

/6NABLE CLEAP CONTROL 

/CLE*" CONTROL 

/5ET VALUE TO LOAQ 

/lETUP COMPARE REGISTER 

/5ET VALUE 10 LOAD 

/LOAD UPPEP BUFFER 

/READ LOWER BUFFER 

/CHECK RESULTS 

/DATA 0,K, 

/ERROR 



/SET ONE TO LEFT 
/LOOP 40«6 TIKES 
/ERROR SILO PUFFERS 
/fCOPE LOOP POINTER 
/TEXT POINTER 



/VeRIF'' THAT THE UPPER SUFFER CAN Be L°*0ED 



1745 
17*6 
1747 
1790 
1751 
1752 
1753 
1754 
1755 
1756 
1757 
1760 
1761 
1762 
i763 
1764 
1765 
1766 
1767 
1770 
1771 

1772 
1773 



2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2020 
20Z1 
2022 
2023 
2024 
2025 



3153 
7301 
4445 
1153 
7040 

3i»e 
iii0 

4421 
4450 
4432 
7610 
5347 
1153 
7104 
7450 
7001 
3153 
4427 
44S0 
17*6 
4405 

5773 
2000 



7301 
4445 
U»4 
3160 
1150 
4434 
4432 
7610 
5232 
1174 
1063 
3160 
4436 
1076 
4447 
7240 
4434 
4432 
7610 
5232 
U74 
3160 



/THEN SINK TO UOWE* BUPf tH, 
/0»S P*TT£KN, 



TST4e, 



USE A ruo*TjNe 



T48t,i 



PACE 





T r ii T R 1 










TAP 


f r fe! ? s 1 


E!! « 






t & & 


TAP 
















SKP CtA 






T49£ 


TAJ? 


TCnTRI 


CUU «A1. 




SNA 




JAC 




DCA 


TCwTRi 


NE«ROR 




ERROR 




TSi4B 




4405 




JMP J 




TSI49 





/SfARt AT T777 

/QltkR CONTROl. 
/GET VALUE TO LOAD 

/Invert ro" 

/SETUP COMPARE RECISTER 
/SET VALUE TO 1,0*0 
/UBAD UPPER SUFFER 
/READ LCWEP 9UFFER 
/CHECK RESULTS 
/DATA C.«, 
/ERROR 



/SET ONE TO LEFT 
/WSC^ 4g«6 TtHES 
/ERROR 511,3 BUFftRS 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEHlpT THAT 

/EMPTY , 
/ 

TST4», 



"DHL" occures when syprEK 



CL* CLl 




CL«ALU 




TAO 


sTeoN 


D5A 


CDREG2 


TAO 


REtfl 


RDSTAT 




ACCMPl 




SKP CLA 




JKP 


T4«E 


TAO 




TAO 


K0e04 


DCA 


GDREG2 


EN«ANi 




TAO 


Kie00 


LO'IAN 




Cl,A CMA 




RDSTAT 




ACiMPl 




SKP CUA 




JHP 


T49E 


TAU 


STCON- 


DCA 


C0REG2 



/Te NEXT Test 



/"OCLR" CLE*' ALL 
/QeT EXPEQ'ftO BITS 
/SETUP COHPASE RESJSTER 

/READ STATUS REGISTER 

/check results 
/o'.k; 

/error, status reqist|r 

/get expected 8!ts 
/setup c9mpare register 

/ENTER HAj'iTENANCE MODE 
/l,8A0 HAimT^NANCE 

/HEAD STATl S REGISTEN 

/GHEtK Rf Si lTS 

/O'.K, 

/tRRRR, 9T' TUS RtGISTE.R 
/SETUP C'^H' Ai«E REGISTER 
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2026 
2027 



4445 
4434 



2030 4432 

2031 4427 

2032 4430 

2033 2000 

2034 5000 



2035 
2036 
2037 
2040 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2867 

2070 
2071 
2072 
2073 
2074 
2075 
2076 



2077 
2100 
2101 
2i02 
2123 



7301 
4445 
1174 
3160 
1151 
4434 
4432 
7610 
5274 
1134 
3193 
4436 
1072 
4447 
2153 
5252 
7300 
4434 
4432 
7610 
5274 
1072 
4447 
7300 
IJ,T4 
1063 
3160 

1150 
4454 

4432 
4427 
4430 
2035 
5000 



7j0i 
4445 
44S6 
1076 
4447 



T49E, 



CLkALL 

RDSTAT 

ACCMPl 

NERROR 

ERROR 

TST49 

5000 



/VeRIfT THAT BUFFER fUUU c*USeS "pRU"! 



TST5B, 



T50E, 



Ct.A CUI. 

clraul 

TAO 
DCA 
TAO 

ROSTAT 

ACCMPl 

SKP CLA 

JMP 

TAO 

OCA 

ENMANl 

TAO 

LOMAN 

ISZ 

JMP 

GUA CLI. 
RpSTAT 
ACCMPl 
SKP CLA 
JMP 
TAD 
LDMAN 
CLA CLt 

T*g 

TAP 

op* 

TAD 

ROSTAT 

ACCHPi 

NtHHOR 

ERROR 

TSTSg 

5000 



sTeo^ 

C0REG2 
RE82 



T5aE 
M4a 

TCNTBl 

K0{e0 

TCNTRt 
i«2 



T50E 
K0{00 



STftON 
K0004 
CDAEG2 

RE8i 



/PCUr "CLEAR STATUS" 
/READ STATUS REGISTE* 
/CHECK RESULTS 
/STATUS r,K , , 40»6 LOOPS 
/ERROR, STATUS REGISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/OCLR "CLR ALL" 

/SETUP COKPARE REGISTER 

/READ STATUS REGSSTER 
/CHECK RPSUufS 

/ERRORf STATUS REGISTER 

/48 COUNTER 

/ENTER MAINTENANCE MOPg 
/^NABUe BITS 
/I.8AD MAINTENANCE 

/^KJP WHEN BUFPEKS ARE FUUt 

/READ STATUS REGISTER 
/CHECK RESULTS 

/ERROR, STATUS REGISTER 

/CAUSE "PRt." OMAN 



/SIT EXPECTED 

/SETUP CCMOAPt RtGISTER 



/SeAD 8T4TUS REGISTER 

/Check resuu^s 

/SfATUS P,^,, 40«6 LOOPS 
/ERROR, STATUS REGISTER 
/SCNPE LOOP POINTER 
/TEXT POINTER 



/VERif That "oSkP" skips on "oKl" e^ROR 



2104 7300 

2105 4441 



Ct* CLL 

CLRALL 

TAD 
LDMAN 
CLA CLL 
OSKSKP 



1*C 



Ki0as 



/□CLR "CLR ALL" 

/ENTER MAINTENANCE MODE 

/!jET «BRL" "OMAN" 

/"OSKP" 



2106 
2107 
2110 
2111 

2112 
2113 

1115 
7116 



till 
8120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
S13g 
2131 
2132 
2153 



5314 
4441 

5314 
4445 
444X 
#427 
«43i 
28f7 
0196 



7}01 
4415 

i0t5 
4442 
4454 
1876 
4447 
4431 
7510 
4427 
4430 
2117 
0007 



O^KSkP 
JMP 

DSKSKP 
NEKRDR 
ERROR 

00(1)6 



i{£7 

T5£E 



PhU 1«2« 



/VEHIfTY THAT "DRl,» pOcS giUSg 
/ENABUEO By "ENABLE )STtf»ftyRT« 
/ 

TSTS2, CU* cut. l*e 
CUHAUL 

TAD K0400 

LOCMD 

ENMANl 

TAD K1000 

UPMAN 

IONHAT 

SKf» CI.* 

NEHROR 

ERROR 

TStSH 

0007 



/eRROR, «OSKP« 

/5l,EAR STATyS "OCRi," 

/»BSkP" skjp 

/SKJP O.K, 409* UOOPI 

/ERROR, "OSKC" SK|P OH "ORl,« 

/fl^OPE UOC "OINTEA 

/TEXT POINTER 

)m "INTERRUPT* ir 

ijT IN COMMAND REGISTER', 



/"eCRU" "CLR *I.L" 

/SET INT', ENABLE «t.OAO COMMAND RE6'," 
/ENTER HAINTENANCE KOiJC 

/"SET BRL" "DHAN" 
/WAIT FOB INTERRUPT 
/ERROR, NO i^T', 
/O'K, INT, OCCURRED 
/eAroR, INT, RtQUEST 
/SCOP loop POINTER 
/TEXTPOIHTER 



2134 
2135 
2136 

2137 
2140 

21*1 
2142 
2143 
2144 
2145 
2146 
2147 
2150 
2lSi 
?1 52 
2193 
2 1 '3 4 
?i55 
21»6 
2157 
2160 



7301 
4445 
4436 
1076 
4447 
4431 
7610 
5396 
1075 
4442 
4431 
7610 
9536 
1076 
4447 
4431 
7610 
4427 
4430 
2134 
0007 



/VrKjirT That »oRl" ShOULC 
/irfWEN "INT, ENABLE BIT ll 

/ 



CAUSe JNT, HQ, ONLT 

SET, OOgS LSCMD CLEAR INT, 



TS1S3, 



2161 5762 



CLA CLL lAC 
CLRALL 
ENMANl 
TAO 
UOMAN 
lONWAT 
SKP CLA 
JMP 
TAO 

L05M0 

lONWAT 
SKP CLA 
JMP 
TA? 
LPMAN 
tONHAT 
SKP CLA 
NERROR 
ERROR 
TStS3 
0007 

JMP I 



K1000 



TSSE 
K0400 



T53E 
Kld|00 



/OCL" "CLR ALL" 

/ENTER MiJWTENANCE MOBC 

/SET "ORl" D'^A'J 
/WAIT F0» INT', 
/O'.K, NO INT, 
/ERROR, !NT, OCCURRED 

/§eT INT. ENABLE AND t}\,tkn JNT*, 
/WAIT PQR !NT, 
/O'.K, NO INI, RQ, 
/ERROR, INT, oecURED 

/S|T "BRL" "OMAN" 
/WAIT tNT, , SHOULD INT, 

/ERROR, WO JWT', 
/O'K; INT, OCCURHED 
/ERROR,, !nT, RQ 
/SeOPE LOOP POINTER 
/TEXT POJNTER 

/TO NEXT Test 
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?162 2200 
2200 



2200 
22131 
2202 
2203 
2204 
2205 
2206 
2207 
2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 



2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2240 
2241 
2242 
22«3 
2244 
3245 
?246 
2247 
225B 
2251 
2252 
2253 
2254 



7301 
4445 
1174 
1063 
3160 
4436 
1076 
4447 
7300 
1191 
4434 
4432 
7610 
5225 
4442 
1174 
3160 
1150 
4434 
4432 
4427 
4430 
2200 
5080 



7301 
4445 
7301 
4445 

1174 
31»0 
4434 

4432 

7610 
9252 
7326 
1174 

7326 
4445 
44 34 
4432 
4427 
4430 
2230 
5000 



PAGE 
/ 

/vehift 
/ 

TSTS4, 



T54E, 



TSTS4 

THAT "LDCMO" CLEARS STATUS RE(jlST£R 

/PCLR "CLR ALL" 



/SETUP COMPARE REGISTER 
/ENTER MAINTENANCE MODE 
/ENABLE 

/SET "ORL" 0"AN 



/REAO STATUS REGISTER 
/PMECK RESULTS 
/O'.K, CHECK CLEA« 
/STATUS REGISTER ERROR 
/CLEAR STATUS, "LOAD SOMMANO' 

/§tTUP COMPARE REGISTER 

/HEAD STATUS REGISTER 
/CHECK RESULTS 
/STATUS 0,K, 4<fi96 LOOR? 
/ERROR, StATUS REGISTER 
/SeOPE LOOP POINTER 
/TEXT POINTER 



CL* CLL 


t*c 


CLRALL 




TAO 


STCON 


TAD 


K0004 


OCA 


CDREC2 


ENHANl 




TAO 


K1000 


LQMAN 




CLA CLL 




TAO 


RE82 


ROSTAT 




ACCMPl 




SKP CL* 




JMP 


T54E 


LOCMD 




TAD 


STCON 


DCA 


GOREGZ 


TAO 


RESl 


ROSTAT 




ACCMPl 




NERROR 




ERROR 




T?t54 




5000 





/vekift 

/ERROR 



TSTS5, 



that RECALIBRATE DOES SeT DRIVE STATUS 
IN THE STATUS REGISTER, 



CL* CLL 


l*C 


CLRALL 




CL* CLL 


!AC 


CLRALL 




TAD 


STCON 


DC* 


CDftEC2 


RDSTAT 




ACCMPl 




SKP CLA 




JMP 


T59E 


CL* CLL 


CML RTL 


TAO 


STCON 


DC* 


GDREG2 


CL* CLL 


CML RTL 


CLHAUL 




ROSTAT 




ACCHPl 




NfRROR 




ERROR 




TST55 




9000 





/LNABLE CLEAR CONTROL 
/{lEaR CONTROL 
/INASLE CLEAR CONTROL 
/ENABLE CLEAR CONTROL 

/SETUP EXPECTED CgMPARE 
/READ STATUS REGISTER 
/5HECK RESULTS 
/STATUS O.K, 
/ERROR, STATUS 



/SETUP EXPECTED COMPARE 
/ENABLE RECALIBRATE 
/RECALIBRATE 
/READ STATUS 
/CLECK RESULTS 
/O'.K, 409« LOOPS 
/ERROR, STATUS 
/SCOPE LOOP POINTER 
/TEXT POINTER 



1117 



PACE i»28 



22S5 
2ZS6 
22»7 
2260 
2261 
Z262 
2263 

2264 

2256 
2267 
2270 
2271 



2272 
2273 
2274 
?275 
2276 
2277 
2300 
2301 
2302 
2303 
2304 
2305 
2506 
23B7 



7301 
4445 
4444 
U,?4 
1061 

4434 
«4S2 
4427 
4430 
2255 

we 



7301 
4445 

1076 
4442 
4444 
44S1 
5305 
1PT5 
4442 
44S1 
4427 
4430 
22?2 
3607 



2311 
2312 
2313 
2314 
2315 
2316 
2317 
23ZB 
2321 
2322 



7331 
4445 

4444 
4441 
9J20 
4441 
5320 
4427 
4430 
2310 
0006 



/ 



TH*T -UOAO DISK ADDRESS CAUSES" "mn SnfgS ER«0R" 



STCOM 
REBl 



/ "ODES 
/ 

TSTis7 I 



Ct.* CLi. 

TAD 
TAD 
DC* 
TA5 

RpSTiT 

ACCmPI 

NERROR 

ERROR 

TSt&6 

5000 

TH'^T «dkjV£ status eBROH' 

UOCMO CUEAR INT," 



/READ STiTUS REGISTER 
/CuECk RESUuTS 
/STATUS 4096 I.0OPS 

/ERROR, STATUS RtCiSTE" 
/SeOPE UOOP POINTER 
/TEXT POINTER 



CAUSftS JNT', RO', 



Cl,* Cll. 

ClRAtL 

TAD 

UDCMO 

t,OAOO 

lONKAT 

TAD 

UOCMO 

lONWAT 

NERROR 

ERROR 

TST97 

0007 



lAfi 
K0«00 



T5?E 
K0400 



/gcUR "CLR ALU" 

/SET jnt; eNtayE "i^oap command" 

/SET "SELECT", LOAD OJSK ADDRESS 
/H*|T FOP EXPECTE.D INT', 
/fRROR, l^iT', 

/?LEAR INT; "tCAO COMMAND" 

/O'.K, !NT| WORKED 
/ERROR, SELECT ERROR JNT, 
/SCOPE LOO' ""OINTER 
/TEXT POtNTER 



/VEHIF^ 
/"DRJvC 



TSTSB, 



)ISK 9K!P 



23Z3 7301 



THAT "(..0*0 DISK ApORESS" 
STATyS ERRqR". TEST WITH 

CL* CLL !*e 
CL«ALL 
LDADO 
DSKSKP 

JMP T98E 

DSKSKP 

JMP T58E 
NERROR 
ERROR 
TSt58 



/VEHlfY THAT SELECT ERROR C*USeS "dSKP' 
/ 

TST&V, CI.A CUL lAC 



/OCL" "ClR ALL" 
/L8A0 B!SK AND CO 
/DSKP DISK SKIP 10! 
/ERROR, "iO SKIP 
/DSKP DISK SKIP 10! 
/ERROR, "^0 SKIP 
/STATUS 0,K, 
/ERROR, STATUS REGISTER 
/leOPE LOO" POINTER 
/TEXT POIN'EB 

TO SKJP CSS ERROR 



PALt0 ^1^2 
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ltI7 



PAGE 



2324 4445 

2325 4444 

2326 4441 

2327 5JS3 

2330 4445 

2331 4441 



2332 

2333 



4427 
4432 



2334 2323 

2335 l«006 



2336 5737 

2337 2400 



ClhALL 
LOAOO 
DSKSKP 
JMP 

CLRALL 

DSKSKP 

NERROR 

ERROR 

TSt&V 



JMP I 
TST60 



T59E 



/ 

PACE 

/VERIFT THAT SELECT ERROR CAUSgS 
/THEN INTERRUPT 



/dclr "Cur '^ll" 

/load di?k address anq go 

/gSKP "SKJP ON ERROR" 
/ERROR, ^10 SKIP 
/CLEAR SKIP 
/DSKP 

/5',K, «0<'6 L,r!OPS 
/ERROR, "QSKP SKIP" 
/SCOPE LOOP POINTER 
/TEXT POINTER 

/TS NEXT TfST 



"OSKP" TQ Sk|P on £.RR0R 



2400 
2401 



7301 
4445 



TSTSB, 



2402 1064 

2403 3220 

2404 1075 

2405 4442 



2406 
2407 

2410 
2411 



4444 
4441 
5216 
18*5 



2412 3220 

2413 4431 

2414 7610 

2415 4427 

2416 4450 

2417 2400 
2420 0006 



2421 7301 

2422 4445 

2423 1065 

2424 3243 

2425 1075 

2426 4442 

2427 4436 

2430 1076 

2431 4447 

2432 4431 

2433 5241 

2434 1044 

2435 3243 

2436 4441 

2437 7610 



CLA CLU 


lAC 


CLRALL 




TAO 


K0e06 


OCA 


T6aE*2 


TAO 


K0400 


LQCMO 




LDAOD 




DSKSKP 




JMP 


T60E 


TAD 


K0007 


OCA 


T60E4'2 


lONWAT 




SKP CLA 




NERROR 




ERROR 




TSf60 




0006 





T60E, 



/VEKirT THAT "DHL' 
/ 



/DCLR "CLR ALL" 
/SETUP TEXT POINTER 

/SET INT", ENABLE 

/1,9A0 BISK AWD CO 
/DSKP DISK SKIP 
/ttiROR, HO iKJP 

/SETUP TEX' POINTER 
/s'ilT FOR 'NT, 
/taROR, ^0 INf, OCCURRED 
/i<lP iNH !NT, 0,K, 
/ERROR, nSKP OR INT, 
/SCOPE LOOP POINTER 
/MOOiriED TEXT POINTER 



CAUSES AN JNT, THEN SK|P 



-TST51, 



CLA CLi. 


lAc 


CLHALL 




TAD 


K0007 


DCA 


T6£E*2 


TAD 


K0400 


LDCMD 








TAO 


Kla00 


LDHAN 




lONNAT 




JMP 


T6£E 


TAO 


K0006 


DCA 


T6£E*2 


DSKSKP 




SKP CLA 





/OCLR "CUR AUU" 

/SETUP TFXT POINTER 

/SETUP INT', ENABLE 
/EMTER M4ji.TrNANCE MODE 

/SET "DRL" UHAN 
/WAIT FOR !NT, 
/ERROR, MO Pit", 

/SETUP TEXi POINTER 
/"SSKP" SHrULD SKIP 
/ERROR, NO SKIP 
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2442 
2443 



2472 
2473 



25B4 
2905 
2906 
2907 



2421 



2470 7301 

2471 4445 



U?4 
3148 



2474 44S4 

2475 4452 

2476 7610 

2477 5323 
2§eg 4456 
2501 7326 

2902 UT4 

2903 3160 



7326 
4449 
4434 
44S2 



2910 7610 

2911 5325 

2912 1150 
2513 «103 
2914 1449 
2919 7326 
2S16 11T4 



T616( 



NEfROR 
ERROR 
TST61 
0007 



/Mtmrf THAT MAINTENANCE DOES JNHJBIT 

/QRivE STATUS ERROR SKIP 
/ 

1*6 



T62E 



2444 


7301 


TST62i 




2445 


4445 




CUHAUU 


2446 


4441 




DSKSKP 


2447 


7610 




SKP CU* 


2450 


5265 




JMP 


2491 


7326 




CU^ CLU 


2452 


4445 




Cl,*«ALl 


2493 


4441 




OSKSKP 


2494 


5245 




JMP 


2495 


44S6 




ZH»hHX 


2496 


4441 




OSKSKP 


2497 


7610 




SKP CtA 


2460 


5265 






2461 


7326 




Ct* CLl. 


2462 


4445 




CtRALL 


2463 


4441 




OSKSKP 


2464 


4427 




NERROR 


2465 


4430 


T62E, 


ERROR 


2466 


2444 




TSt62 


2467 


0006 




0006 



T62E 



T6JE 



/ERRORi SKIP 0" iNti 
/SCOPE LOOP POiNTEft 
/HOOinin T£5fT POINTER 



/5i:E*R CflNTKOL 
/8ISK SKIP 
/5'K, NO SKIP 
/ERROR, SKIP 

/«eCALI8RATt 
/pfSK SK!P 
/ERROR, MO SKJP 
/SET HA IV 
/PfSK SKIP 
/0',K, MO SKJP 
/ERROR, SKIP 

/RECAL13BATE 
/PISK SKIP 
/Q*K, 4096 LfOPS 
/ERROR, DISK SKJP 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VrWirT THAT "REqAtlBRATE" The" 05LR tfOES S£T BUSY 

/AMD QSIvE STATUS ERROR 

/ 

TST63, 



CU* CLL 


t*t 


/CLEAR CONTROL 


CLRALL 


TAD 


ST60N 


/ESPrCTED STATUS 


OCA 


GDREG2 


/SETUP COMPARE REGISTER 


RDSTAT 




/READ STATUS 


ACCMPl 




/JHECK RESULTS 


SKP CLA 




/STATUS f),K, 
/ERRORi STATUS 


JMP 


T65E 


ENMANl 


/ENTER MAINTENANCE 


Cl,A CLL 


CHL RTL 




TAO 


sreoN 


/EXPECTEn STATUS 


OCA 


G0REG2 


/SETUP COMPARE REGISTER 


CLA CLL 


cn\, RTu 


/"RECALIRRATE" DCLR 


CLRALL 


RDSTAT 




/READ STATUS 


ACCHPl 




/CHECK RESULTS 


SKP CLA 




/STATUS CI,K, 


U(^P 


T63E 


/ERROR, STATUS 


TAD 


REOl 




AND 


K7776 


/MASK eUT ei,EAR CONTROL 


CLRALL 




/OCLR 


CI.* CLL 


CMi; RTU 




TAO 


sreoN 





PAL10 Vi42 



20«APRii79 



PACE 1*31 



2517 


1072 




tAO 


K0i00 


252e 


Ji&a 




OCA 


G0REC2 


2521 


Xl5l 




TAD 


RE82 


2S>?2 


44 34 




RDSTAT 




252J 


4<532 




ACCHPl 




2924 


*427 




NEKROR 




2625 


A43Z 


T63t, 


ERROR 




2926 


Z470 




TST63 




2527 


5000 




9000 





/Busy bit 

/setup compare register 
/head status register 

/5HECK RESULTS 
/SfATUS, O'.K, 4B»6 LOOPS 
/fRROR, RECALIBRATE 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VERIFY THAT "RECALIBRATE" THEN 
/OR \ vl STATUS, AND TRANSFER DONE 

/ 



STCON 
GDREe2 



•qrl" Results jn qRUi 



2530 


7501 


TST64, 


CL* CLL 


2931 


4445 




CLRALL 


2532 


1174 




TAD 


29SS 


3i6e 




OCA 


2534 


4434 




RDSTAT 


2935 


44S2 




ACCHPl 


2936 


7610 




SKP CL* 


2537 


5365 




JMP 


2940 


4436 




ENHANl 


2941 


7326 




CLA CLL 


2542 


11T4 




TAO 


2543 


3160 




OCA 


2S44 


7326 




CL* CLL 


2545 


4445 




CLRALL 


2546 


4434 




RDSTAT 


2547 


4432 




ACCMPl 


2550 


7610 




SKP CLA 


2551 


5365 




JMP 


2552 


7326 




CL* CLL 


2553 


U74 




TAO 


2554 


itei 




TAD 


2595 


1063 




TAO 


2556 


3160 




OCA 


2597 


H76 




T*9 


2560 


4447 




LOMAN 


2561 


li90 




TAD 


2562 


4434 




ROfTAT 


2563 


4432 




ACCMPl 


2S64 


4487 




NERRQR 


2965 


4430 


T64E, 


ERROR 


2566 


2530 




TSt64 


2567 


5000 




5000 


2570 


5771 


/ 


JMP I 


2571 


2600 


/ 


TSt65 




2600 


PAGE 





T»4£ 



STfiON 
G0REC2 



Tft4E 

CML RTl 

STfiON 

K4800 

Ke004 

GORec> 

REGl 



/CLEAR CONTROL 

/SETUP COMPARE REGISTER 
/READ STATUS 
/CHECK RESULTS 
/STATUS O.K. 
/ERROR, STATUS 
/ENTER MAINTENANCE 

/EXPECTE5 STATUS 
/SETUP COMPARE REGISTER 

/PCLR 

/READ STATUS 
/QHECK RESULTS 
/STATUS O.K. 
/SRROR, StAfuS 



/EXPECTEO STATUS 

/ENABLE SHIFT 

/L8AD MAINTENANCE SET ORL 

/READ STATUS REGISTER 
/CHECK RESULTS 

/O'.K', «a?6 LOOPS 

/ERROR, STATUS ReGIST^R 
/SCOP| LOOP POINl'ER 

/TEXT POINTER 

/TO NEXT TEST 



/VERIFY THAT "REcAL I BRATe" THEN 
/DRIVE STATUS AND BUSy ERROR IN 



"PLC*" SETS 
STATU? REGISTER 



TSTbb, CL* CLL lAfi 



*Ui0 


V142 




lf£7 


2601 


4445 






2602 


1174 


TAD 


STSON 


2603 


3160 


OCA 


GDREG2 


2604 


44J4 


ROSTAT 




2605 


<43Z 


ACCMPl 




2606 


7610 


SKP CtA 




2607 


»2S3 


JMP 


T6$E 


26113 


4436 


ENMANt 




2611 


7326 


cu* cut 


CML "TU 


2612 


1174 


TAP 


STftON 


2613 


3160 


DQA 


CDREC2 


2614 


7326 


Ci,A CLI. 


CMi; RTl. 


2615 


4445 






2616 


4434 


RDSTAT 




2617 


4432 


ACCHPl 




2622 


76115 


SKP CUA 




2621 


5233 


JdP 


T6SE 


2622 


7326 


CUA CLl 


CML RTL 


2623 


1072 


TAO 


KB{00 


2624 


1174 


TAO 


sTeON 


2625 


3160 


OCA 


5DREG2 


2626 


4443 






2627 


llSl 


TAO 


RES2 


2630 


4434 


R 0 b T A T 




2631 


4432 


ACCMPl 




2632 


4427 


NERROR 




2633 


4430 


T69t, ERKOR 




2634 


2600 


TSt6? 




2635 


9000 


5000 





PACE 1»32 



/VE«ifV THAT "RECALIBRATE" THEN "Q^oc' 
/DOES SET SUSY EHRqR IN STATUS 



2636 


7331 


TST66, CL* Cll 


1*11 


?637 


4445 


CuXALL 






4436 


ENMANl 




2641 


7326 


CL* CLL 


CKL RTL 


2642 


4445 


CL«ALL 




2643 


7326 


CLA CLL 


CML RTL 


2644 


1072 


TAO 




26«5 


1174 


TAP 


STCON 


2646 


3160 


OCA 


GDREG2 


2647 


4442 


LD?MO 




2650 


1151 


TAD 


RE62 


2651 


4434 


RDSTAT 




2652 


4432 . 


ACCHPl 




2653 


4427 


NEKROR 




2654 


4430 


ERROR 




2655 


2636 


TSt66 




2656 


5000 


5000 





/CLEAR C^NTHJt. 
/EXpeCTET ST^US 
/SETUP COMPARE REGISTER 

/READ ST«TUS 
-/CHECK RrSULTS 
/STATUS C,K, 
/Ei^RORj STATUS 
/ENTER MAINffNANCE 

/EKPECTE5 STATUS 
/SETUP C5HPARE REGISTER 



/READ STiTUS 
/CHECK RESULTS 
/STATUS OjK, 
/ERROR, STATUS 



/EXPECTED STATUS 

/UOAO CUSRCNT ADDRESS 

/READ STATUS REGISTER' 
/gwECK RESULTS 
/O'.K', 4096 unops 
/ERROR, STATUS REGISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/qilkH CONTNOL 
/CNTCR MAtKiTENANCC 



/^XPECTEn STATUS 

/tOAO COMMAND REGISTER 

/HEAD STATUS REGISTER 
/CHECK RESULTS 
/0',K, #096 LOOPS 
/ERROR, STATUS REGISTER 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VEKIFV THAI RECALIBRATE THE»< 3LAU RESUL^^ 
/3Ui»T AND ORIyE STATUS ERROR, 



2657 7301 TST65'| CL* CLL lAc 



PALIB V142 



20.APH-73 



lli7 



2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2670 
2671 
2672 
2673 
2674 
2675 
2676 



2677 
2700 
2701 



2706 
27t»7 



2712 
2713 



?7Z0 
2721 
2722 
?723 
2724 
2725 
2726 
2727 
2730 
2731 
2732 
27 53 
2734 
2735 
2736 
2737 
2740 



4445 
4436 
7326 
1072 
1174 
3160 
7326 
4445 
4444 
4434 
4432 
4427 
4430 
2657 
5000 



73?1 
4445 
4441 



2702 76ie 

2703 5315 

2704 4436 

2705 7326 



4445 
4443 



2710 4441 

2711 5315 



4441 
5315 



2714 4427 

2715 4430 

2716 2677 

2717 0006 



7301 
4445 

4436 
7326 
4445 
7326 
1174 
1101 
1263 
3140 
1076 
444 7 
1150 
4434 
4432 
7610 
5350 



clr*ll 

ENMANl 

CLA CLL CML RTL 
TAO KBiaa 

TAD STCON 

OCA G0REC2 

CLA CLL CML RTL 

CLRALL 

UOAUU 

RDSTAT 

ACCMPl 

NEHROR 

ERROR 

T5t67 

5000 



/Clear Cdntkol 

/^NTEK maintenance 



/EXPECTED STATUS 
/SETUP EXPrCTEO COMPARE 
/ENABLE REr-ALtBRATE 

/LOAD OHK AHDRESS 

/HEAD STATUS 

/CKECK RrSl.'uTS 

/O'.K, 4096 LOOPS 

/ERROR, RU' Y OR ORIVE STATUS 

/SCOPE LOO" POINTER 

/TrXT POINTER 



/VERIfT THAT SKIP OCCURReS ON BUST e;RHOR 
/ 

lAc 



TST68, 



CLA CLL 

CL«ALL 
DSKSKP 
SKf ClA 
JMP 
ENMANl 

CLA CLL CML RTL 

CLRALL 

LOCUW 
DSKSKP 
JMP 

DSKSKP 
JMP 

NERROR 
ERROR 
TST68 
0006 



T68E 



T68E 
T6tE 



/CLEAR Ce^fKOL 

/OSKP 

/Skip e.K, 

/LRROR, rit'^K SKIP 
/ENTER MAINTENANCE 

/DeLR 

/LOAD CU^'RF'NT ADDRESS 
/DSKP DISK SKIP 
/ERRORj NO SKJP 
/OSKP DISK SKJP 
/ERROR 

/q;k, 4C96 LOOPS 

/ERROR, PSKP 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/VtRirV THAT DCLR CLEARS *tU OP STATUS REGISTER 



TSTftV, 



CLA CLL lAfi 

CL«*LL 

ENMANl 

CLA CLL CML RTL 

CL«ALL 

CLA CLL CML RTL 
TAO STCON 
TAO K4g00 
TAO K0B04 

DC* GDREG2 
TAD K100? 
LO«an 

TAO REGl 

RDSTAT 

ACCMPl 

SKP CLA 

JMP T69E 



/CLEAR CONTROL 
/ENTER MAINTENANCE 



/EXPECTED STATUS 

/ENABLF 'SHIFT 

/LOAD MAlMTEMANCt SET D«L 

/READ STATUS REGISTER 
/CHECK RESULTS 
/O' K 
/ERROR 





V 5,42 




73 


1!£7 








Cl.«Al.i. 




2742 


1174 




TAD 


STftON 


27^3 


3 J,S0 




OCA G0RtG2 


2744 


1151 




TAD 


HE52 


274S 






R0ST4T 




2746 


4432 








2747 


4427 




NEHROR 




2750 


<43e 


T69t:, 


ERROR 






272g 




rst69 




z752 


5000 




mm 








/ 


THAT JNTeRRUPT I 


Sf 9 J 




T ST 7B 1 


cu* cut. 


ue 


2754 










2f 55 


1075 




TAD 


K0400 


2|56 


4442 




U05H0 




2157 


4436 




ENHAMl 






7326 




Ct* CLU 






4445 




CUKALL 




2f 62 


4431 




lONWAT 




2763 


7610 




SKP CLA 




2t54 


5374 




JMP 


T70e 


2f 65 


4445 




CU«ALL 




2? 6 6 


4431 




lONHAT 




2767 


5374 






T7aE 


2770 


4445 




CLHALL 




2|n 


4431 




lONWAT 






7610 




SKP Ct* 




27'3 


4427 




NERROR 




27'4 


443g 


T7BE# 


ERROR 




2T'i 


2753 




T$I70 




27 -'6 


0007 




0007 





PAGE 4«34 



2777 7301 

30BB 4445 

Safl 4436 

3002 7326 

3003 4445 

3004 1076 



3005 
3B»6 
3007 
3010 
3011 
3012 



4447 

7326 
1174 
10*3 
1101 
3140 



3013 4453 

3014 1150 

3015 4434 

3016 1151 

3017 4443 

3020 use 



/SETUP COMPARE RtSlSTER 

/READ STATUS 
/CHECK RPSiJu'S 
/0;K. 4096 ItO^S 
/ERRORj STITUS RESISTER 
/SCOPE UOOP POftitER 
/teXT POINTER 



/CLEAR CON'Wi. 
/£NA9l.e !N*( Sll 
/I.I3AD tSMHAND 
/ENTER M4i»ITEN*NCE 

/oeuR 

/KAJT roB !NT, 
/!N!T', S,K, 
/ERROR, S!SK INT, 
/QLEAR STATUS 
/WAIT roR INTERRUPT 
/ERROR, »fO |NT', 

/ecus 

/ttAjT FOR fNT, 

/|nt, e.K, 

/O'.K, 4094 I.BO?S 
/EUROS, INT, 
/feOPE LOOR POfNTER 
/TEXT POINTER 



/VERlfV THAT "RL'BUP". "Qi.C»"t "ORSff "0'i.*5" 
/OR "QSKP" DOES NOf AFFECT STATUS REGISTER', 
/ 

TST71, 



Ct* CLL 






CURALL 


/qitkfi CONTROI. 


ENMANi 




/ENTER MAlNfCNANCE 


CIA ctu 






CURALL 




/ecLR 


TAO 


K130B 


/SNABUE SHIFT 


tDMAN 




/l,OAO MAINTENANCE 


CUA ClU 


CMl. RTL 




;!§ 


STCON 






K0004 




TAO 


K4000 


/EXPECTEn STATUS 


og* 


G0REG2 


/SETUP COMPARE REGISTER 


RDBUF 




/READ BUFFEH 


TAD 


RE51 




RDSTAT 




/READ STATUS 


TAD 


RE02 




UDCUR 




/l,OAO CURRENT ADDRESS 


TAO 


REBl 





PAl.10 V142 



20.APR»73 



iii7 



PA6E t«35 



3021 
3022 
3023 
3024 
J02S 
3026 
3027 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3040 
S041 
3042 
S04S 



4441 
7000 
4444 
U50 
M2i 
U51 
4434 
4432 
7610 
5241 
4445 
1174 
3160 
4434 
4432 
4427 
4430 
2777 
5000 



OsKS^P 




/UjKp 


UDAOO 




/tOAO BISK ADQUESS 


TAD 


RESl 




UOBUF 




/l,8AD BUFFER REGISTER 


TAD 


RE02 




RDSTAT 




/READ STATUS 


ACCMPl 




/CHECK RESULTS 


SKP CLA 




/STATUS 


JMP 


T7£E 


/E.RROR, STATUS 


CtHALL 


/CLEAR STATU"; 


TAO 


STCON 


/EXPECTEri STATUS 


OCA 


GPRE(;2 


/SETUP CCiMP*''E REGISTER 


RPSTAT 




/READ STATUS 


aCCMpi 




/CHECK ReSUuTS 


NERROR 




/O'K, 40'>6 LOOPS 


ERROR 




/ERROR, STATUS REGISTER 


TSt7l 




/SCOPE LOOP POINTER 


5000 




/TEXT POINTER 



T7lt, 



/VEKiFT That "worq coumt" 

/TRANSFER DOME ONLy AFTER 
/TRANSFER DONE SHOULD SET 



OVERFLOWS ANp StTS 
256 (12 B{T COUNTS), 
ON THE Ji TN, SHIFT 







/OF THE 


256 TH, 


WORD, 


3044 


7240 


/ 

TST7Z| 


CL* CMA 




3045 


3150 




OCA 


RE61 


3046 


7J21 




CL* CLL 


lAC 


3047 


4445 




CLR*LL 




3850 


UT« 




TAO 


STCON 


sesi 


3160 




OCA 


GDREG2 


3052 


7326 




CL* CLL 


CML RTL 


S053 


1X32 




TAO 


M12 


3054 


315J 




DC* 


TCNTRl 


30S5 


1137 




TAO 


M2g5 


3056 


3154 




DC* 


TCNTR2 


30S7 


4436 




ENMANI 




3060 


113? 


T72K, 


TAO 


Hit 


3061 


3195 




OCA 


TCNTR3 


3062 


1071 




TAD 


K0i0e 


3063 


444? 




loman 




S064 


21S9 




ts« 


TCNTR3 


3065 


9243 




JMP 


.•a 


3066 


4450 




R08UF 




3067 


4434 




ROSTAT 




3070 


4432 




ACCHPl 




3071 


7610 




SKP CLA 




3072 


5315 




JMP 


T72E 


1073 


2154 




1S« 


TCNTR2 


3074 


52*0 




JMP 


T72R 


3075 


1072 




TAP 


K0I00 


3076 


4447 




LDHAN 




3077 


2153 




ISi 


TCNTRl 


3100 


3276 




JHR 


,'2 


3101 


4434 




•0ST4T 





/iET FBR 1 PASS PER TE'T 

/UCLR "CLR ALL" 

/SETUP COMPARE REGISTCH 
/TWO 

/FOR FINAL WOROI 

/FOR ONE LEfS THAN "WAST WORD" 
/ENTER MAlNTCNANCe HOOf 

/fOR EACH U BIT WORD 
/tNABLt 9|T» reSMIFT 8Jl,e 
/L8A0 MAINTENANCE 
/SKIP ON CVCRY »12 BIT XORO" 

/THIS SHOULD PREVENT A "ORL" 
/GET STATUS 
/CHECK RrSULTS 

/STATUS ERROR 

/COUNT 255 "12 BIT WORDS" 
/ENABLE SHIFT SILO 
/L0A8 MAINTENANCE 
/BIT COUNTER 
/COUNT 11 BITS 
/READ STATUS 



%\i7 



S102 

siBS 

5104 
3105 
5106 
5107 
3110 

5112 
3X13 
3114 
3115 
Sil6 
S117 



*4S2 
7610 
551S 
7330 
11T4 
31*0 
1072 
444? 
«4S4 
*432 
4427 
4430 
3B44 



3120 5721 

3121 32(50 



S200 

3201 

3202 

3203 

3204 

32P5 

3206 

3207 

3210 

3211 

3212 

3213 

3214 

3215 

3216 

3217 

5220 

3221 

3222 

3223 

3224 

3225 

3226 

3227 

3230 

3231 

3232 

3233 

3234 

3235 

3236 

3237 

32*0 



7240 

3150 

1137 

3156 

7301 

4445 

1156 

3153 

1132 

3154 

4456 

1072 

4447 

2154 

5214 

4450 

2153 

5210 

7S01 

4445 

1174 

3160 

1132 

3153 

1157 

3154 

4436 

1132 

3155 

107Z 

4447 

2155 

5236 



T72£( 



*gCH '1 

gHI» T7gE 

CU* cut CMU RAR 

TAO STCON 

DC» G0«EC2 

TAO K0ia0 
(.OMAN 
RDSUT 
ACCMPl 

TSf72 
5000 



TST73 



/STATUS e,K. 
/tRRORs STAUIS 



/SETUP COMPARE REGISTER 

/SmrT IN (.AST WORD 
/HEAD STATUS 
/QHiy TRANSrtR DONE 
/STATUS OK 

/ERROR, 12 SIT COUNTER 
/SCOP LOOP 
/TEXT POINTER 

/TO NEXT Test 



PAGE 
/ 

/VEKIFT 
/ 

TSr73, 



T73H1, 



T73Hi;, 



THAT DCUR DOES CUE»H BJT eOU^ IeR 



T73K3, 



CU* CMA 




05* 


RESl 


TAO 


M255 


OCA 


TCNTR4 


CUA cut, 


tAC 


CIRALU 




TAO 


TCNTR4 


OCA 


TCnTRI 


TAD 


HIS 


DCA 


TCnTR2 


tNHANl 




TAD 


K0i:0p 


UDMAN 




tse 


TCNTR2 




,»2 


ROBUF 




ISl 


TCNTRI 


JHP 


T7SR2 


Ct* CLl, 


lAC 


CI.KALL 




TAO 


sTeoM 


DCA 


GDREC2 


TAO 


HlJ 


DCA 


tcntri 


TAO 


M255 


OCA 


TCNTR2 


ENMANl 




TAO 


Mi2 


DCA 


TCNTS3 


TAO 


K0i0?! 


UOMAN 




ise 


TCNTR3 


JHP 


.»2 



/SET roR 1 PASS PER TEST 

/SETUP COUNirR 
/OCUR "CUR *t.l." 



/l? BIT WQRO COUNTER 

/ENTER MAItOTFNANCC HOOP 

/tNABlE SHIFT 

/UOAD MAINTENANCE 

/COUNT SHIFTS 

/MORE TO 0" 

/PREVENT 

/Oe IT 1? TJMES 

/HORE 12 8tl COUNTS 

/ENABUE cue*" eONTROU 

/AND CLEAR TME COUNTER 

/SETUP COMPARE REGISTER 

/FOR FINAU WOROI 

/FOR ONE LESS THAN "l.*ST WORO" 
/ENTER MAINTENANCE MODE 

/FOR EACW 12 BIT WORO 
/ENABLE 0IT§ T8SHIFT SILO 
/UOAD MAINTENANCE 
/?KIP ON EVERY "12 BIT WORD" 



PAI.10 V142 



20OAPH.73 



1117 



PASE 1»37 



3241 4450 



3242 4434 
S243 4452 



rDhuF" 

RDSTAT 
ACCMPI 



/TMlS SHOULD PREVENT A "DrL" 

/SET STATUS 
/CHECK RESULTS 



S2<4 
32*5 
32*6 
32*7 

3250 
S2Si 
3252 
32S3 
3Z54 
3255 
3256 
3257 
3260 
3261 
S262 
326J 
5264 
3265 
3266 
3267 
327(5 



7610 
5266 

2154 
5233 

7330 

1174 
3160 
1072 
4447 
2153 
5254 
4434 
44S2 
7610 
5266 
2156 
52B4 
4427 
4430 
3200 



SKP CU* 




JMP 


T73E 


ISi 


TCNTR2 


JMP 


T73R3 


CLA CUU 


CMU PAR 


TAD 


STfiON 


OCA 


G0REG2 


TAD 


K0i00 


UOMAN 




ISi 


TCNTRI 


UMP 




ROfTAT 




ACCMPi 




SKP CUA 




JMP 


T73E 


ISi 


TCNTR4 


JMP 


T73RI 


NERROR 




ERROR 




TSt73 




5000 





/STATUS ERf'OR 
/COUNT ii'i "18 BIT WORDS" 

/^ETUP COM'ARE HECISTER 

/smrr in uast word 



/READ STATUS 

/ONLT TRANSFrR DON? 

/STATUS 0,K, 

/6RR0R, STATUS 

/yPOATE SPCCIAU COUNTER 

/MORE TO TE5T 

/STATUS OK 

/ERRORi 12 BIT COUNTER 
/§eOP LOO^ 
/TEXT POtNT^R 



3271 
5272 
3273 
5274 
3275 
S276 
3277 
3300 
3301 



7301 
4445 
1072 
4442 
7340 
31S0 
1135 
3153 
4436 



/VEKIFT THAT 12TH BIT 0,K, H 
/SETUNC D8 CONTl»l, THIS JS 
/HAUF 8U0CK DATA BREAKS ON A 



OOeS INHIBIT 
WHAT STOPS 
READ BREAK, 



TST74, 



CUA CUU 

cu«*tu 

TAO 

UOCMO 

CUA CUL 

OCA 

TAP 

DCA 

ENMANl 



I*C 
KBi0P 

CMA 
REG! 
M128 
TCNTRI 



/CUEAR Cf5NTH0l, 

/HALF BUCCK ''RiNSPERS 

/UOAO COMMAND 

/SETUP FOR I PASS 

/COUNTER FOH 128 HOROS 
/ENTER MAINTENANCE MODE 





Vl«2 


20«APR»73 


ll{7 PACE 1«3B 






31*0 


T74f!i| 


oc* 


t;0REc:2 


/fCTUP COH^aRE RtCISI 


3303 


1132 




TAD 


Hl2 




3304 


31S4 




DC* 


TCNTR2 


Blf WORB COUNTER 


3305 


7300 


T74R2, 


Cl,A cuu 






3306 


1372 




TAO 


K0ia0 


/?VA8t,E SHIPT 


3307 


4447 




t,DM AN 




/WOAO MAINTENANCE 


3310 


2194 




ISt 


TCNTR2 




3311 


5307 




JMP 


.■"2 




3312 


4450 








/«E*o uoMER nurnn 


S313 


4432 




AC5M('1 




/9MECK Rcsuuri 


S314 


7610 




SKP CI.* 




/OATA 8,K, 


3315 


9340 




JHP 


T7«E 


/ERROR 


3316 


2193 




IS* 


TCNTRl 


/50UNT 128 WORDS 


3317 


9302 




JMP 


T74R1 


/MORE TO SO 


3320 


1135 




TAO 


Ht48 




3321 


3153 


■ 


DC* 


TCNTRl 


/fETUP COUNTER 


3322 


1192 


T74H3 1 


TAO 


M12 


3323 


3154 




Dp* 


TCNTR2 


/SETUf BIT COUNTER 


3324 


7326 




CI,* CLU 


CM|. RTU 


3325 


1072 




TAD 


K0|00 


/ENABte SHIFT 


332« 


«447 




UOMAN 




/COAO MAINTENANCE 


3327 


2154 






TCNTR2 


/COUNT BITS 


3330 


9326 






• •2 


/MORE TO 60 


3331 


4492 








/R6AD LOWER BUFFER 


3332 


4452 




A?CMP1 




/Check Rtsui.TS 


3333 


7610 




SKP CL* 




/P4TA 0,K, 


3334 


9340 






T74E 


/ERROR 


3335 


2153 




tsi 


TCNTRl 


/yPOATE COUNTER 


3336 


5322 






T74R3 


/TEST t28 TIMES 


3337 


4427 




NCRROR 




/TO NEXT TrsT 


334{il 


"450 


T74|:, 


ERROR 




/ERROR, 128 WORD 


3341 


3271 




TSf74 




/SeOPE UOOP POINTER 


3342 


44B5 




4405 




/TEXT POINTER 



/VEKIFT THAT TRANSFER DONE "AtONE* C*U8ES 
/DSKP TO SKIP, 
/ 



3343 


7340 


TST79, 




CMA 




3J44 


3190 




OCA 


RE81 


/8eT FOR 1 PASS PER TE»T 


53A5 


7301 




CI,* Ctl. 


lAC 


3346 


4445 




Cl«ALL 




/OOCR "CUR ALL" 


3347 


1137 




TAO 


M29S 


3jsa 


3153 




OCA 


TCNTRl 


/ONE LESS THAN «I,A5T WORD" 


3351 


1132 




TAO 


M12 


33S2 


3154 




OCA 


TCNTR2 


niHki, HORO 


3353 


44 S6 




ENMANi 




/ENTER MAINTENANCE MOD? 


S354 


1132 


T75H, 


TAO 


«12 


S355 


^155 




OC* 


TCNTR3 


/"I2 B!T» W0»0 COUNTER 


3396 


1072 




TAU 




J357 


4447 








/UOAO MAINTENANCE 


3360 


2155 




IS2 


TCNTR3 




3361 


5357 




JMP 


i»2 


/C5UNT 1? RIT WORDS 


3362 


4450 




ROBUr 




/PREVENT "DRL" 


3353 


4441 




OSKSKP 




/SHOULD NOT SKIP HERE 

/b; K , 


3364 


7610 




SKP CUA 





PAL10 


V142 


20»APR«73 


ll{7 PASE 1»39 




3365 


9377 


JMP 


T75E 


/ERROR, nSKP 


3366 


2153 


I5i 


TCnTRI 




3367 


5354 


JMP 


T75f! 


/COUNT 255 wflRDS 


3370 


1072 


TAO 


K0£00 




3371 


4447 


UOMAN 




/LOAn h*!NTe;v**j:e 


3372 


2154 


JS< 


TCNTR2 




3373 


5371 


JMP 


1*2 


/PO ONE MORE. WBRD 


3374 


4441 






/DSKP »SK!P" 


3375 


7610 


SKP CL* 




/ERROR, DSKP DID NOT SKIP 


3376 


4427 


NEHROR 




/P'.K, 4096 LOOPS 


3377 


4430 


T75E» ERROR 




/ERROR, OSKP 


3400 


3343 


TST75 




/SCOPE LOOP i»OINTER 


3401 


0006 


0006 




/TEXT POINTER 



/ 

/VEKUfT TH*T TRANSFER DONE CAUSES "INT, Ro," 
/ 



3402 


7J40 


TST76, 


CL* CLL 


CMA 




3403 


3150 




DCA 


RECi 


/SCTuP FOR 1 PASS PEP TEST 


3404 


7301 




CL* CLl 


lAC 


3405 


4445 




CU«ALL 




/yCLR "CLR ALL" 


3406 


1137 




TAO 


H255 




3407 


3153 




PCA 


TCNTRl 


/ONE LESS Than "LAST WORD" 


3410 


US2 




TAP 


M12 




3411 


3154 




Dp* 


TCNTR2 


/FJNAL WORD 


3412 


1075 




TAD 


KB400 


/ENABLE INT, BIT 


3413 


4442 




LDCMO 




/LOAD COMMAND REGISTER 


3414 


4436 




ENMANI 




/ENTER MAINTENANCE MODE 


3415 


1132 


T76K, 


TAO 


Mt2 


3416 


3155 




DCA 


TCNTR3 


/"IZ BIT" WCD COUNTER 


3417 


1072 




TAO 


K0100 


/ENABLE SH!FT SJLO 


3420 


4447 




UOMAN 




/LOAD MAfNTEMANCE 


3421 


2195 




m 


TCNTR3 


3422 


5220 




JMP 


|t!2 


/esUNT "12 BIT" WORDS 


3423 


4450 




Roaur 




/PREVENT "BRU" 


3424 


4431 




lONWAT 




/ H A I T FOR INT, 


3425 


7610 




SKP CUA 




/O'.K, NO INT, 


3426 


9240 




JMP 


T7»E 


/ERROR, INT, OecURED 


3427 


2153 




ise 


TCNTRl 




3430 


5215 




JMP 


T76H 


/COUNT 259 WORDS 


3431 


1072 




TA? 


K0I00 




3432 


4447 




LOMAN 




/LOAD MAINTENANCE 


3433 


2154 




\Sl 


TCNTB2 




3434 


5232 




JMP 




/DO ONE wQRE WORD 


3435 


4431 




IPNH*T 




/WAJT FOR EXPECTED INT'i 
/ERROR, INT, DIDN(T OCCUR 


3436 


7610 




SKP CUA 




3437 


4427 




NEHROR 




/0',K, 4096 LOOPS 


3440 


4430 


T76tV" 


ERROR 




/ERROR, JNT, 


3441 


3402 




T5f76 




/§eOPE LOOP POINTER 


3442 


0007 




0007 




/TEXT POINTEP 



/ 



/VFRlFf "qAT* BHeAk" from CURRENT FIELD LOrATIBN 0 
/gSE 0*T* PATTERN g000 AND 7777, "DO A W^lTE" 





Vi42 


2g«APN«73 


5ll£7 PAGE i»40 




3443 


73?i 


f 

TST77, 


CU* CLU 






3444 


4445 




CU«*LU 






34^5 


4436 










3 4^6 


1X^2 




TAU 




/CuR^CnT rtE^O BITS 


3447 


1X01 




TAP 






5 4 90 


4 4 42 




UOCHD 








iise 




TAD 


HEGi 










cut, HAR 






J#53 


7630 










3 4 5 4 


7340 




CLA CLU 




/MiUT ttniTi unsmt 
/n4ftt "UAiK wyny' 


3455 


St60 




OCA 






3^56 


1160 




TAD 






3457 


3000 




DCA 




/STC^E OUT yOU^D D^TA 


3 4 6 g 


7340 




CU* cut 


4 




3461 






UDCUR 




/5tT CURRE^-'T ADDRESS TO 7777 


3462 


44^3 




UPCUR 






3463 


1071 




TAD 






3464 


4447 




UDMAM 




/COAO AND l!0 


3465 


4450 




ROBUF 




/READ DATA BUTTER 


3466 


4432 




A r r M p * 

A U W n r i 






3467 


4427 










3470 


«430 


T7Tt. 








3471 


5443 




TSt77 




/SCOPE LOOP POINTER 


347J 


4263 




4Z63 




/TEXT POINTER 



/V'cHIrY Th*T "pATA SRfiAK" WO»KS r^OM l,Oc*TfON 0 

/or CyRHtNT FJElD, 00 "A WRJTE" AND USE DATA 

/PATTtRN "ZS25 AND !5252" 
/ 



3473 


7301 


TST7B, 


CU* cuU 


!*e 




3474 


4 4 45 




CU«*UU 


/OCUR "CUR AtU" 


3475 


4436 




ENHAfJl 




/ENTER MAINTENANCE MODE 


3476 


1190 




TAD 


REGl 




3477 


7110 




CUU RAR 






3500 


7630 




S21, CU* 






3501 


1113 




TAD 


KZ525 




3502 


1113 




TAO 


K2S25 


/Take data word 


3503 


3160 




DCA 


G0KEC2 


/SETUP COHPaRE REGISTER 


3504 


1160 




TAO 


G0REG2 






308)0 




DCA 




/store OUTBOUND DATA 


3506 


1172 




TAO 


HOMEMA 


/GET CURRENT FtEUDBJTS 


J&B7 


U22 




TAO 


K5000 


/SET "WRITE ENABUE BIT" 


3510 


4442 




UDCHD 




/tOAO COMMAND REGISTER 


3511 


1191 




TAO 


HE82 




3512 


4443 




UPCUR 




/SET CURRENT ADDRESS TO 7777 


3513 


4443 




U'DCUR 




/tOAO CURRENT ADDRESS TO 8 


3514 


1071 




TAO 


K0040 


/OaTA BREAK ENABUE 8IT" 


3515 


4447 




UDMAN 




/U8A0 AND RO 


3516 


4450 




ROBUF 




/READ DATA BUFFER 


3517 


4432 




ACCMPl 




/CHECK RESUUTS 


3520 


4427 




NERROR 




/0',K', 4094 UOOPS 
/ERROR| DATA BREAK 


3521 


4430 


T78t, 


ERROR 





PAUl?" V142 



3i22 3473 
35H3 '*243 



20,APR»73 



PAGE i.4t 



3524 

3525 

3526 

3527 

3530 

3531 

3532 

3533 

3534 

3535 

3536 

3537 

5540 

3541 

5542 

5543 

5544 

5545 

3546 

3547 

3550 

3551 

3562 

3S53 

3554 



7331 
4445 
4436 
1150 
7it0 
7630 
7340 
3160 
1160 
3526 
1150 
4443 
7340 
4443 

iiei 

4442 

i0n 

4447 
4450 
4432 
4427 
4430 
3524 
4263 



3535 
3556 
3557 

3560 
3561 
3562 
3563 
3564 
3565 
3566 
3567 
3570 
3571 
3S72 
3673 
357.4 
3575 



7301 
4445 
4436 

1150 
7110 
7630 
1113 
1113 
3160 
1142 
3526 
1172 
1122 
4442 
1151 
4443 
7340 



TST78 
4263 



/VEHlfY THAT "DATA BREAK" »IORK FRO" 
/OF CURRENT FIEUO, DO A wRITE AND 
/00a0 AND 7777, 
/ 

TST7V, 



T79ti 



CUA CUU 


lAC 


CUMAUU 




ENMANl 




TAO 


RE{51 


CUU fA" 




SZl, CUA 




CU* CUU 


CHA 


DCA 


G0REG2 


TAO 


GDREG2 


DCA I 


K7777 


TAO 


REGl 


UDCUR 




CUA CUU 


CMA 


UOCUR 




TAlj 


homeha 


TAO 


K40ei!t 


UDCMD 




TAD 


Kee40 


UDMAN 




RDBUF 




ACCMPl 




NEHKOR 




ERROR 




TSt79 




4263 





/Scope uoop pointer 
/text pointer 

U0CATJ9N 7777 

USE "ATA PATTERN 



/peu« "cu« Auu" 

/5NTER MAINTENANCE NODE 



/MAKE DATA WIRO 

/SETUP COMRARE REGISTER 

/STORE OUTBOUND DATA 

/SET CURRE'^T ADDRESS 

/UOAH CURRENT ADDRESS TS 7777 

/CURRENT FIEUO BITS 

/WRITE ENABUE 

/t,eAO COMMAND REGISTER 

/BREAK ENABUf BIT 

/UDAD AND 60 

/READ OATA BUFFER 

/CWECK RESUUTS 

/O' K, 4096 UfOPS 

/ERROR, DATA BREAK 

/SeORE UOOf POINTER 

/TEXT POfNTE" 



/VfHIFV "data BREAK" FROM LOCATION 7^77 OF 
icUHRENT PitUO, DO A "WRITE- A^O USE QATA 

/PATTfcRN 2S25 ANP 5252', 



TSTba, 



cU* cut 


lAC 






ENMANl 




TAO 


RESl 


CUU RA" 




S^U CUA 




TAO 


K2525 


TAO 


K2525 


DCA 


G0REG2 


TAO 


GDISEG2 


DCA I 


K7?77 


TAO 


HOhEHA 


TAO 


KS000 


tOCMD 




TAO 


RE02 


UDCUR 




CUA CUU 


CMA 



/DCtR "CUR AUI." 

/INTER MAINTENANCE MOOt 



/MAKE OATA WORD 

/SETUP CCHPARE REGISTER 

/STORE OUTBOUND DATA 
/CURRENT F!EUO BITS 
/FUNCTION "WRITE" 
/U8A0 CO>^MAND 

/SET CURRENT ADDRESS 



PALX0 Vi42 



3576 
S577 
3600 
3601 
S602 
3603 
3604 
3«05 
3606 



4443 
IBTl 

4447 
4450 
4432 
4427 
443e 
5555 
4263 



LDCUR 

TAD 

1.0MAN 

ROeUF 

ACCHPi 

NE.KROR 

ERROR 

TSf 8e 

4263 



/y^nirr Th*T "oata SReAk" 

/•LOCATION 0, Of! A nw^!^E" 
/Ai.Sw VtHl^r THAT OATA IN 
/ON A WHITE BREAK, (NOTEl 
/JN INDICATOR "DT|"! 



/|,0a5 eUWRCNT A0a«E8» TO 7777 

/BREAK lUkiit RIT 

/i.nAS «A!N?!^'ANCE and so 

/QNtCK RESULTS 
/O; K, 4096 UOOPS 
/tKROR, nATA BREAK 
/SCOPE LOO" POINTER 

/TEXT POINTER 



36K7 


7jai 


/ 

TST81 1 




1*6 


3610 


4445 




CU'^AUL 




3611 


4436 




ENMANl 




3612 


1 1'l 




TAD 


WE82 


S613 


31#0 




OCA 


GDRCG2 


3614 


1160 




TAU 


U0REC2 


3615 


3B00 




DC* 




8616 


4443 




UOCUR 




3617 


1172 




TAO 


HOMEMA 


S620 


urn 




TAD 


K4800 


3621 


4442 




LDCMD 




S622 


lan 




TAO 


K8t40 


3623 


4447 




UDMAN 




3624 


4450 




ROByp 




3625 


4432 




ACfMPl 




3626 


7610 




SKP CLA 




S627 


52S5 




JMP 


T8£E 


3630 


iBm 




TAO 


0 


3631 


3ire 




OCA 


OTHEG 


3632 


1170 




TAD 


DTRE5 


3633 


4432 




ACGHPl 




S63* 


4487 




NERROR 




3635 


**u 


T81£, 


ERROR 




S636 


3*B7 




T§t6l 




S637 


42(3 




4263 





«Df?KS fHOH gURRfMT field 
AND USE ALl. C0M8jNAT!0N PATTERN 
LOCATION e UOESNfT CHANGE 
OATA FROM UOCATleN 0 PUT 



/OCLR "Cin ALL" 

/ENTER KASNTENANCE MODE 

/SETUP CPIHPARE REG5STER 

/|fO»E OUTBOUNP OATA 

/|gT CURRENT AODHESS TO t 

/5URRENT ?!EtD BITS 

/WRITE ruSfTION 

/UBAD CQHMANO 

/OATA BREAK rNABLE BIT 

/i,8AD AND 50 

/READ BUFFER 

/QHECK REISUtTS 

/ERROR 

/§AVE IN CASE OF ERROR 



/5MECK RE5UUTS 
/Q'.K, 4096 LOOPS 
/ERROR, CATA B»EAK 
/fCOPE UOQP POINTER 
/TeXT POINTER 



3640 7301 

3641 4445 

3642 4436 

364J 1150 

3644 3160 



/VERIFY "0*TA BREAK" FRO« LOcA^ON 7777 Or 

/CURRENT FIELD, DO A "wRlTE" AND ySE ALL COMB I NAT J flNS , 

/ALSO VERIFY THAT OUTBOUND DATA |N LOfATION 77T7 

/DOESN'T CHANGE WHEN DOING A WRITE BREAK, (NOTEl DATA FROM 

/LOCATiON 7777 PUT IN INDICATOR "8Tr» 



TST8Z, 



CU* CLW l*C 

CLRALL 
ENHANl 



TAO 
OCA 



REQl 
GDrECZ 



/OCLR "CLR ALL" 

/EMTER MAINTENANCE MODE 



/SETUP COMPARE REGjSTER 



PAL10 V142 



20«APR>73 



1117 



PACE t«43 



3645 
3646 
36«7 
3SS0 
36S1 
5692 
7693 
3654 
3655 
3656 
3657 
3650 
3661 
3662 
3663 
3664 
3665 
3666 
5667 
S670 
S671 



1140 
3526 
7340 

4443 
1172 
11S2 
4442 
1071 

4447 
4450 
4432 
7610 
5267 
1526 
3170 
1170 
4432 
4427 
4430 
3640 
4263 



TAO G0REG2 

OgA t k7»77 

CU* CLU CMi 
LDCUR 



TAD 
T*0 

LDCMD 

TAD 

LOMAN 

ROBUF 

ACCMPl 

SKP CLA 

JMP 

TAO I 

DC* 

TAO 

ACCMPi 

NEHROR 

ERROR 

T5t82 

4263 



HOMEMA 
K9000 



K0040 



T82E 

K7777 

DTREG 

otreg 



/STORE OUTBoUNO OATA 

/5ET CURRENT ADDRESS TO 
/5URRENT FJELO BITS 
/WRJTE FUNCTION 
/LOAD COMMANO 
/BREAK EM*Bi.F BIT 
/LOAD ANF* ec 
/READ BUFFen 
/CHECK RESULTS 

/ERROR 

/SAVE INCASE OF ERROR 

/CHECK RESULTS 
/0-,K, 4094 LOOPS 
/ERROR, OAT* BREAK 
/SCOPE LOOP POINTER 
/TEXT POINTER 



T777 



/VERIFY THAT "DCLR" Cl.C*''S CURRENT AquReS? 
/FIRST DO A DATA BREAK FROM LOCATION 7776 



/THEN "OCL^" FPOH LOCATION 0000, QO 
/ANp USE 0»TA PATTERN ALL COMBINATIONS, 



A WRITE" 



S672 7301 TSTSJ, CL* CLL I*C 



3673 


4445 


CL«ALL 




3674 


4456 


ENHANl 




5675 


1150 


TAO 


RE@1 


3676 


3160 


OCA 


GDREG2 


5677 


1160 


TAD 


GOUESZ 


S700 


3S05 


Of* 1 


K71>76 


5701 


llSl 


TAP 


RE82 


3702 


3000 


ncA 


0 


5703 


1172 


TAO 


HOnEMA 


3704 


1101 


TAO 


K4000 


5705 


4#«2 


LDCMD 




3706 


7344 


CLA CLL 


CMA RAL 


3707 


4443 


LPcyR 




3710 


1071 


TAO 


K0040 


3711 


4447 


LDHAN 




5712 


4450 


ROBUF 




3713 


4452 


ACCMPl 




3714 


7610 


SKP CLA 




S715 


9334 


JMP 


T83E 


3714 


7301 


CL* CLL 


lAe 


3717 


4445 


CLRALL 




3720 


4456 


ENHANl 




S721 


3167 


0C« 


AOREG 


3722 


1172 


TAO 


HOmEMA 


3723 


1122 


TAO 


K5000 


3724 


4442 


LOCMD 


RES8 


3725 


1151 


TAO 



/OCLR "CLR AUU" 

/{NTER MAINTENANCE MOO? 

/SETUP COMPARE REQISTER 

/JTORE OUTBOUND DATA BREAK 1 

/STORE OUTBOUND OATA BREAK 2 
/CURRENT flELO BITS 

/HRJTE FUNCTION 
/LOAD COMMAND 

/LOAD CURRENT ADDRESS TO 7776 

/BREAK ENABLE BIT 

/LOAD AN9 SO 

/READ BUFFER 

/CHECK RESULTS 

/0',K', TRY LOCATION 0 

/ERROR, 9ATA BREAK 

/PCLR «CLE*R CURRENT AOORfSS" 
/ENTER MAlNTfNANCE MODE 
/SfTUP FOR ERROR PRINTER 
/5URRENT FIELD BITS 
/FUNCTION WRITE 
/LOAD COMMANO 





v^4g 


20baPH&73 


1 j £7 


3724 


S140 


DC* 








T AO 




3730 


4 447 






3731 


4450 






5732 


4432 






3733 


44J7 






X734 


443? 


T83t, ERftOR 




3735 


S67Z 


TST83 




S736 


4263 


*2i3 





PACE 1»44 



/Vf.^lf TH»t CURRENT AoCtSS oOfcS J 
/TO eiSBB, DD i w«{tE 0*TA BREAK AND 
/*l,t. COHBiNATION, 



/ieTui* cohpa^e Register 
/anCAK enA8i r bit 
-'S.eAS so 
/HEAD BurrrH 

/CHECK RfSutTS 
/Ari HORkES 4e«6 LOO'S 
/tlROR, SAT* BREAK 
/S80PE LPO** fOINTCR 

Nc«EMeN? from 7777 
ySe DATA PATTERN 



3737 


7301 


T5TB4 , 


Cw* cut 


I *C 


J740 






CURAtu 




S74 J, 


1150 




TAir 


KfcQl 


37*2 


3000 




DC * 




J743 


1J.S1 






Rt@2 


:<7 4< 


SS26 




DC4 1 




?7 45 






CI,* CLU 


C"A 


Ji7«6 










77*7 


4456 




£ NH A^l 1 




^7S0 


1122 






K50i30 


> 7'>1 


1172 




TAC 




7 52 


4 44 2 










7344 




cuA cut 


cma rau 


5754 


315J 




OCA 


TCNTRl 


3755 


ISf i 




TAO 


Keie4e 


3756 


4447 




tPHAN 




3 757 


2153 




|S2 


TCNTRi 


3 ".'60 


9396 






.-2 


3 761 


7320 




cu* cut. 




3"'62 


liSl 




TAD 


REQ2 


3763 


3i6a 




OCA 


GDSEG2 


3 '64 


4450 








3 '65 


44S2 




AcgMPi 




3766 


76ia 




SKP CL* 




5767 


5376 




JMR 


T34E 


3770 


3167 




DQA 


AOREC 


3771 


H50 




TAD 


REBi 


3772 


3160 




OCA 


S0ltEe2 


3773 


44S0 




R08UF 




3774 


«4S2 




ACOHPl 




3775 


4427 




NfRROR 




3776 


445e 


Te4ei 


ER«OR 




3777 


3757 




T?T94 




4eiee 


4263 




4263 





/5I.EAR CONTROL 

/?TORE OUTBOUNP DAT* 

/?TORE OUTBOUND DATA 

/LOAD CURRfNT 4D0RESS 
/IMTER M*SNTENAf<Ce MODE 

/t<»lTE ruNeTiON 

/QURfENT rillO 
/W5AD C0MHAN5 

/2 BREAK CSy^'teR 
/6NABUE BREAK ejT 
/tOAO KAfNTf^ANCE 
/COUNT BREAKS 
/59 2 



/SETUP C5HRARE REGISTER 
/8eT FfRSr WORD 
/CHECK I? 

/gHRORi PIR$T WORD 
/?rTOI> ERR9H (PRINTER 

/§eTUP COMRARE REGISTER 

/(fET SECOND WORD 
/?HECK jt 

/O'.K, 4a»6 uoo's 

/OiTA SRTAK 

/feOPE LOOP POINTER 

/TEXT ROINTER 



/VeHIFT TH»T cU«RENT ApoRESS nOgS JNC«E«ENT 
/AOORESS TEST FHOM 0200 TO TSTB9 OF CyRRENT 
/riEUO, OO'a WRiTE DATA BREAK, 



PA|,i0 V142 



4301 
4002 
4003 

4e(»4 

4e?5 

4 0t'6 

40P7 

4010 

4011 

4012 

4013 

4014 

4015 

4016 

4017 

4020 

4021 

4022 

4023 

4024 

4025 

4026 

4027 

4030 

4031 

4032 

4B33 

4034 

4033 

4036 

4037 

4040 

4041 

404^ 

4043 

4044 

4043 

4045 

4047 

4053 

4051 

4052 

4053 



7301 
4445 
7340 
3J50 
1073 
3154 
1073 
4443 
4436 

4444 
1554 
3153 
1154 
7110 
7630 
7240 
3i*0 
H60 
3554 
1172 
1101 
4442 
1071 
4447 
7300 
1155 
3594 
1154 
31*7 
4450 
4432 
7610 
9251 
U54 
1147 
7650 
5250 
2i»4 
5211 
4427 
4430 
4801 
4265 



4054 7940 

4055 3150 

4056 H37 

4057 S153 

4060 7301 

4061 4445 

4062 1153 

4063 3154 



20bAPHb73 
TST85| 



TBSRli 



llil' 



PACE t«45 



T850K, 
T99E, 



Cl.* CLU 


lAC 






Cl* CV. 


CK* 


OCA 


REGl 


TAO 




DC* 


TCnT»2 


TAO 


K0200 


UOCUR 




ENMANl 




IDADD 




TAO ! 


TCNTR2 


DC* 


TCmTRI 


TAD 


TCigTR2 


CUi, RAR 




CLA 




CUA CMA 




DQA 


GDREG2 


TAD 


GDREG2 


OCA i 


TCNTR2 


TAD 


MOhE^A 


TAD 


K40ei(' 


UDCMD 




TAO 


K0a40 


t0HA«J 




CU* CLL 




TAO 


TCNTRI 


OCA J 


.TCNTR2 


TAD 


TCNTR2 


OCA 


AOREG 


Rosur 




ACSMPl 




SKP CCA 




JMP 


T89E 


TAD 


TCNTR2 


TAO 


MTSB5 


SNA Ct,A 




JMP 


TSSOK 


IS*. 


TCNTR2 


JMP 




NERROR 




ERROR 




TSt99 




4263 





/9CI.R "C|.R Auu" 

/SETUP FOR 1 PAS? PER TEST 

/START AT ACORESS 0200 

/U8AD CURRENT ADDRESS 
/ENTER MAINTENANCE MODE 
/KEEP WRITE INHIBIT CUEAR 
/GET INSTRUCTION 
/9AVE JNSTRyCTION 



/gSE OAT* T777 

/SETUP COMPARE REGISTER 

/STORE OUTBOUND OAT* 
/CURRENT FItLD BITS 
/WPtTE FUNCTION 
/U8A0 COMMAND REGISTER 
/fSEAK Z*ikn\,r 611 
/LOAD ANO 80 

/GET SMSTRUCTJON 

/REPLACE INSTRUCTION 

/AQORESS OF BREAK 
/SET OAT* 
/5MECK ReSUl,T5 

/IRRCR, ;*TA BftAK 

/fPECSAL POIMTER FOR START OF 
/ThJS TEST', 
/TEST 0,K, 

/LOOP DO 0888 TO T8T|e 

/THIS ADDRESS WORKED TRY NEXT 

/6RR0R, DATA BREAK 

/seOPE uno" POINTER 

/TEXT POINTER 



/VERirT THAT B LAST BRcAK SETS AFl|R ?56 HRJTE D*TA BREAKS 
/AND vERIFy'THAT OCUR CUEARS w^lTf INM|BtT COUNTER'. 
/ 

TST86, cw* CLw CMA 

OC* REGl 

TAO M255 

DC* TCMTRl 
T86HI1 Cl* CLl lAC 

CUBAUU 

TAD TCnTRI 
DC* TCNTR2 



/Stt^f ?0R 1 f*SS 'ER TEST 
/SPECIAL ceywTER 
/qleaR control 

/AMOUNT fiF BREAKS TO DO 



l!£7 



<0»4 
♦ 865 

4Bft6 
4067 
♦B7g 
4871 
4072 
4073 
«0T4 
t$79 
«076 
4877 

4i00 

«101 

4103 
«104 

4ia6 
4187 

4110 
4111 

«H2 

4113 

«H4 
4115 

411? 
«120 
412i 
4t?2 
4123 
41?4 
4125 
41?6 
4127 
4130 
4131 
4132 
4133 
4154 
4135 
4136 
4137 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4150 
4151 



44S» 
UfZ 

1101 
4«42 
44*3 
7840 
5800 
7.S40 

me 

4447 
4450 
*4S2 
7HS 
5552 
2154 
527? 
T501 
4445 
7340 

lis? 

3154 

73B0 

SBB0 
316® 
4436 
4443 

1122 
U»2 
4442 
1071 
4447 
44S0 
44S2 
761? 
5352 
?1,»4 
5S12 
1182 
3155 
7540 
3000 
4443 
1071 
4447 
4450 
4432 
7610 
5352 
2155 
5334 
2153 
5260 
4427 



T86HZ| 



TAD 

TAD 

Ct* ClL 
DC* 

CI,* Cll 

?s; 

ROsgr 

JMP 

III 

Ct* CLt 
T*0 

OC* 

cu* cut 

OC* 

og* 

tNHANl 

T*0 

L05M0 

TA? 

I.OMAN 

RO»yr 

»CCMP1 
SKP CU» 

JM 



homEm* 

K48e? 



CH* 

B 

C0HEG2 

K0e4e 



T86E 

TCNTR2 

T8»R2 

ue 

CH* 

M235 

TCNTR2 



0 

COKECZ 



K9Be0 
HOMEHA 



K0e4e 



D9* 

T86H4, CI* CLU 




Ta»E 

tcntrs 

T»»R3 
K7000 

TCNTflS 
CHi 



K004e 



Te»E 

TCNTR3 
T86R4 
TCMTRl 
T8»Rt 



/|NTeR HilNTENANCE MOQC 

/Current fiM sirs 

/WRITE rUNCTION 
/LOAD COMMAND 

/S,eAD CURRENT ADDRESS 

/STORE OUfBOUNO DATA 

/SeTUP COMPARE REOISTER 
/MliK ENA8UE 8|T 

/igOAO iNfi eo 

/set WBRfi 

/CHECK Rrsuufs 
/OAT* 

/QO 0ae95 BREAKS 

/CLEAR CONTROL ANO COyNTER 

/«B6 BREAK COUNTER 

/MAKE DATA PATTERN 
/§TORE OUTBOUND OAT* 
/lETUP COMf*«E REGISTER 
/ENTER MAINTENANCE MOOt 
/(.OAO CURRENT ADORESS 
/WRITE FUNCTION 
/CURRENT riELD 
/LBAO COMMAND 
/|NAB1,E BREAK BIT 
/U9A0 MAINTENANCE 
/6|T WORR 
/CHECK Rr$UI.TS 

/Word c,k, 
/Oata err6« 

/ee 256 WRITE BREAKS 

/CLEAR CegNTCfl 

/STORE NOT OUTBOUND DATA 
/USAO CURRENT AOORfSS 
/6NABUE BREAK B|T 
/LOAD "SHQUUP NOT BRIAK« 

/set OAT* 

/CHECK IT 
/0»TA O.K', 

/ERROR, DATA BREAK INHIBIT 

ZOO "101»a FAKEM BREAKS 

/START ALL OVER WITH ONE LESS 
/to NEXT TEST 



PAL10 V142 

4152 443B 

4153 4054 

4154 4263 

4155 5756 

4156 4200 

4200 



1117 



P*CE 1»47 



4200 
4201 
4202 
4203 
4204 
4205 
4206 
4207 
4210 
4211 
4212 
4213 

4214 

4215 
4216 
4217 
4220 
4221 
«2Z2 
42Z3 
4224 
42H5 
4226 
4227 
4230 
4231 
4232 
4233 
4254 
4235 

4236 

4237 
4240 
4241 

4242 
42«3 
4244 

4245 
4246 
4247 
4250 



7340 
3150 
1137 
3153 
73(?1 
4445 
1153 
Sl?4 
4436 
1072 
1172 
1101 
4442 
4443 
7340 
3000 
7340 
3160 
1071 
4447 
4450 
4432 
7610 
5271 
2154 
5215 
4444 
1135 
3154 
73B0 

3000 
31*8 

4443 
1071 
4447 
4450 

4432 
7610 
5271 
2114 
S2S5 



T66E.» ERROR 
TStB6 
4263 

/ 

JMP I 
TST87 

/ 

/VEHIfT THAT 8 U*St BRgAK SeTS *F!tR 
/HAUf BIT IS SET, ALSO MAKE SURE LOAD 
/THE INHIBIT COUNTER CORRECTLTi 



/ERROR, DATa break 
/SCOPE LOOP POJnTEP 

/Tbkt pointer 
/to nekt test 



i28 BREAKS IF 
QiSK AOORES$ 



LOABS 



TSTS7, 



T87R1, 



T87R2, 



CLA CLL CMA 
OCA REOl 
TAO Mg55 
OC* TCNTRl 
CLA CLL lAe 
CLRALL 



TAD 
DC* 

ENMANl 
TAD 



T87R3, 



TCNTRl 

tcnthz 

K0J00 

HOHEKA 

K4800 



LOCHO 

CL* CUL 
DC* 0 
CL* CLL CM* 



CMA 



DC* 
TAO 
LOMAN 
ROBUF 
ACCMPl 

UOADD 

TAD 

DC* 

CL* CLL 

DC* 
DC* 

LOCUR 

LOMAN 
ROBUr 
ACCMPl 
SKP CLA 
JMP 

JMP 



G0REC2 
K0040 



T8fE 

TCNTRg 

T87R2 

M1S8 
TCNTR2 



0 

GDREC2 



T87E 

TCNTR2 
T87R3 



/SeTuP FOR 1 PASS PER TEST 

/SPECIAL geyNTER 

/CLEAR CONTHOL 

/AMOUNT or BREAKS TO 00 
/ENTER MAINTENANCE MOPE 
/HALF BIT 

/CURRENT rtELD BITS 

/WRITE rusetiON 

/LBAO COMMAND 

/L8A0 CURRENT ADDRESS 

/?TORE OUTBOUND DATA 

/ffTUP COMPARE Rt5|ST|R 
/BREAK ENABLE BIT 
/LOAD AN" 60 
/qtJ WORD 
/CHECK RESULTS 

/QATA ERROR 

/Ce SO MANY BREAKS 

/LOAD ADDRESS ANO INHIBIT COUNT 

/;Z8 BRE»K feUNTER 

/MAKE BAT* WORD 
/8?0»6 OUTBOUND DATA 

/SeTU^ COHPARE RtJISTEH 
/t9*D eURRENT AOORESB 
/fNiiyi SREAK Bit 
/te*0 MAINTENANCE 

/JET W6Rn 
/fwECK RrSULTS 
/WJRD 

/QATA ERROR 

/08 128 WRITE BREAKS 



V142 



20s»PR.73 



l»AOE 1.48 



4251 
4252 

4253 
4254 
42S5 
4296 
4257 
4262 
4261 
4262 

4263 
4264 
4265 
4266 

4267 
4270 
4271 
4272 
4273 



3iS5 
7340 
3000 
4443 

%sn 

4447 
4490 
44S2 
7610 
5271 
2155 
5293 
2153 
5204 
4427 
1432 
4200 

4263 



T40 




DC* 








05* 












^pM AN 








* CCMPi 










fOft, 


I 3® 






T@7R4 




TSMTRl 


JHP 




NEKROR 




C M « 0 R 




TSTe? 




4263 





/|fO»t NO? OUTBOUNO DAT* 

/ 1,8*0 eUl'Rr'*^ ADDRESS 

/INABLt nRr*K BIT 

/i,8A0 "SWOl u" NOT BREAK" 

/CST OAT* 

/5MECK if 

/OiTA 0,K, 

/enROR, BA- A BREAK INHIBIT 

/BO "iSCa FSKE« BREAKS 

/START ALL OVEB NITN ONE LESS 
/To NEXT T 5T 
/CRB^^Rj BREAK 
/SCOPE I. no ' POINTER 

/trXT POINTER 



/VEW FY THAT "DATA BREAK" 
/TO lOCATJON 0 OF CURRENT 
/PAT'IRN 0800 AND 7777', 



WORDS W5^H A "BtAO" 
PIEI.D, ySE yATA" 



4274 


7301 


TSTB' , 


Ct* CLI. 


Ut 


4275 


4445 








4276 


1172 




TAO 


HOMEMA 


4277 


4442 




LDCMD 


REei 


4300 


1150 




TAO 


4301 


7110 




Ci,\, RAR 




4SK2 


76S0 




S2k, CLA 




4J0S 


7240 




CLA CHA 


GDBE52 


4304 


31*0 




DC* 


43^5 


u»ei 




TAO 


G0SEG2 


43ei6 


44?1 




UOBUF 




43B? 


lan 




TAO 




4J10 


4447 








4311 


7328 




CL* CLU 


AOREG 


4S12 


3i*7 




ogA 


4313 


1000 




TAO 


0 


4314 


SI.T0 




OCA 


OTREC 


4315 


U?0 




TAO 


OTREC 


4316 


44J2 




ACCf^Pl 




4317 


««t7 




•TERROR 




43H0 


4450 




EH«OR 




4321 


4274 




TStsS 




43ZZ 


42»S 




4213 





/PCLR 'CI'" ALL" 
/QURRENT riELO 
/CeAD COHHANO TO 0 



/SETUP COf-PA^E REGISTER 
/GtT VALUE TP LOAIJ 
/UOAO UPBER "UTER 

/LOAD *Nf5 60 

/ABORESS rSR PRlNTfR 

/get iNBouwo WORD 

/?»VE IT 

/CHECK 

/0',K, »89« UOOPS 
/^RROR, n*»* 9«EAK 
/tfCOPE LOOP POINTER 
/teXT POtNTt* 



/VEHIFT WITH A "READ" THAT "DATA BREAk" wyRK? 
/fRQx LOCATION "7777" OF CURRENT fJELP USE 
/DAT* PATTfRN 0000 AND 7777, 



4323 -'301 TST8», CU* CLt tAft 



PAL10 Vi42 



20«APR«73 



l!£7 



PASE 1«49 



4324 
4325 
4326 
4327 
4330 
4331 
4332 
4333 
43S4 
4335 
4 3 56 
4337 
4340 
45«1 
43«2 
43«3 
4344 
4349 
4346 

4347 

43S0 

435*1 

4352 
4353 



4372 

4373 

4374 
4J75 
4376 
4J77 
4400 
4401 



4445 

1076 
1172 
4442 
1150 
7110 
7630 
7240 
J160 
7240 
4443 
U*0 
4421 
1071 
4447 
7300 
1526 
3170 
1170 
4432 
4427 

4430 

4 323 
4263 



4354 7301 

4355 *445 

4356 U72 
«357 «442 

4360 1150 

4361 '110 
43*2 -630 

4363 U13 

4364 1113 

4365 3160 

4366 M60 

4367 "^21 

4370 4443 

4371 1871 



4447 
■'300 

1800 

:U70 
1000 

4432 
4427 
4430 



44B2 --394 
4403 4263 



CI.RAIL 

TAO K1000 
TAO HOMEMA 

LOCMO 

TAO RE61 

CtL HAR 
S2L CLA 
CLA CH* 

OCA G0«En2 

CLA CMA 
LDCUH 

TAO GDREr.2 

LPsgr 

TAD K0B40 

LOMAN 

Ct.A CLL 

TAO ! K7777 
OC* DTREG 
TAD DTREG 
ACCHPl 
NEHROR 
ERROR 

Tste9 

4263 

/ 

/yiHirf TH*T "pATA BREAK" 
/CUHKiNT FIELD LOCATION 0 
/SatiV ♦ 252> 



/CURRENT FIELD 

/LOAD COMMAND FOR REAp 



/^ETUP COMPARE REGISTER 

/LOAD CURRtNT ADDRESS 
/GET VALUE TO LOAD 
/LOAD UPPER BUFFER 
/ENABLE "RfAK SIT 

/LOAD ANO eo 



/GET "WORD" 



AVE INBOUND WORD 

/CHECK r 
/O'.K, 4096 LOOPS 
/ERROR, OATA BREAK 
/icOPE LOOP POINTER 
/TEXT POINTER 



WITH A "REAu" TO 
USE OATA PATTERN 



TITV0, 



CL* CU 
Cl,«AlL 
TAO 
LDCHD 
TAO 



RAR 
CLA 



HOMEMA 
REOl 



at 

TAP 

TAD 
DC* 
TAg 

LPsur 

LOCUR 

TAO 

LDHAN 

CLA CLL 

TAD- 

DCA 

TAD 

ACCHPi 
NERROR 
ERROR 
TST90 
4263 



/VEHIfT THAT "pATA BREAK" WORp WJTH 



K2525 
K2525 
G0REC2 
00REG2 



K0840 



OTREC 



/OCLR 

/CURRENT FIELD 

/UBAD COMMAND TO READ 



/p4TA J252 

/JETUP COMPARE REGISTER 
/SET VALUE TO LOAO 
/LSAO UPPER BUFFER 
/LfiAO eURRPNT ADDRESS TO 0 
/^NABLr BREAK 
/LOAD ANP "^0 



/§AVE DATA 
/CMECK 

/O'.K, 4096 L»OPS 
/ERROR, nATA BREAK 
/SCOPE LOO'^ POINTER 
/ffXT POINTER 

A "READ" 



ll£7 



/TO CURRENT ntUO LOCATION l.OC»TJ0N ?777, 
/yst Q*T» ^*TTEHN ^252 ♦ 2925 



4404 


7?0l 


TST91, CU* ClU 




4405 


4445 






4406 


1172 




hOmEha 


4407 


4442 


LOCHO 




4410 


7240 


CL» CM* 




4411 


4443 






4412 


1150 


TAO 


RE91 


441$ 


7110 


Ci,W "AR 




4414 


7630 






4415 


1113 


TAO 


K2f 2S 


441* 


lilS 


TAp 


K2525 


4417 


3i6e 


oc* 


C0RCC2 


4420 


116? 


TAO 


S0AEC2 


4421 


4421 






4422 


107i 


TAO 


K0840 


4423 


4447 






4424 


730? 


Ct* CLI. 




4425 


1526 


TAO I 


K7»77 


4426 


3170 


OCA 


OTREC 


4427 


1176! 


TAO 


OTIEO 


4430 


44S2 


ACCMrit 




4431 


4487 


NCRROR 




4432 


44Se 


ERROR 




4433 


440<i 


TSt9l 




4434 


42*3 


4263 





4435 7301 

4436 4445 
44S7 4436 

4440 1127 

4441 3153 

4442 1^90 
4449 3194 



4444 
4445 



U72 
1101 



4446 4442 

4447 4443 
44S0 1154 

4491 3000 

4492 1071 
4*53 4447 

4454 7300 

4455 2194 



4496 
4497 



7000 
2153 



/CURRENT riEt.0 
/|,8A0 eOHHANB 

/WSAO eyRRCNT ADDRESS 



/WHAT 0*1"* 



JSC 
52?t 



/SETUP eOHPASE REGISTER 

/feT VIL.UE to lom 
/!,8*o upf^n nyrrtR 

/5ET 8«E4K WORD 

/S4Ve FOR ef"»0« PRINTER 

/O'K, 4096 tOOPS 

/SCOPE UOOR POINTER 
/feXT RO!MTE» 



/ 
/ 

/VERlrV THAT "DATA BUFPgRS" c*'^ B| FUCEO 
/ON A hRIII'DATA break from LOCATION 
/0 0» CyRHtNT f JCLei, USE ALL COHBINATIONS, 
/ 

TSTV2, 



T92H1, 



4460 9247 

4461 1127 



CW* CLL 


1*6 


CL«*LL 




ENHANl 




TAO 


M4 


OCA 


TCNTRl 


TAD 


REOl 


OCA 


TCNTR2 


TAO 


HOHEMA 


T*D 


K4800 


UPCMp 




LOCUR 




TAO 


TCNTR2 


Df * 


e 


TAO 


K0g40 


LOHAN 




CL* CLl 




ISi 


TCNTR2 


NOP 




15* 


TCNTRl 


JMR 


T98Rt 


TAO 


H4 



/OeiR "CL« ALL" 
/ENTER MiSNfENANCE HOP| 

/reR ?ouR WORDS 

/CUT* START 

/SURRENT ntlD 
/WRI'E rUNCTIO*J 
/L9A0 COMMAND 

/LOAD CUORENT iODRESS TO f 

/|TORE OUT BOUND DATA 
/|NABLE ORfAtf BIT 
/L8A0 AN" 60 

/yPOATE ?ATA WORD 



/riLU BUfFtR 



PAL10 V142 20. APR. 73 



1117 



PACE l«dl 



4462 


3153 


DC* 


tCntrI 


4463 


U50 


TAO 


REGl 


4454 




DC* 


GDREC2 


4465 


445g 


T92K2, RQBur 




44*6 


M32 


ACCMPi 




4467 


7610 


SKP 


CLA 


4470 


5276 


JMP 


T9JE 


4471 


2160 


!SZ 


G0REG2 


4472 


7000 


NOP 




4473 


2153 


ise 


TCNTRl 


4474 


9265 


JHP 


T92R2 


447S 


4427 


NtHROR 




4476 


44S0 


T92t, ERROR 




4477 


44S5 


TST92 




4500 


4263 


4263 

/ 




4501 


5702 


JMP J 




4502 


4600 


T5T93 





/VEKIF'f 
"RE A 



THAT "JAT* SREAK" works «iTH 
TO CURRENT FIELD LOCATION 0 



/TRY Ai,L COMBINATIONS 



4600 


7301 


TST93, CL* CLL 


1*6 


4601 


444S 


CLRALL 




4602 


1172 


TAD 


HOHEMA 


4603 


4442 


LOCMO 




4604 


3167 


DC* 


AOREC 


4605 


llSl 


TAD 


RE32 


4606 


3160 


DC* 


G0REC2 


4607 


114? 


TAO 


SDREC2 


4610 


4421 


LpBUF 




4611 


1071 


TAO 


K0fl4B 


4612 


4447 


LPMAN 




4613 


7300 


CLA CLL 




4614 


1000 


TAO 


0 


4615 


3170 


OCA 


DTREG 


«616 


1170 


TAD 


0TRE5 


4617 


4432 


ACCMPl 




4620 


4427 


NERROR 




4621 


44S0 


ERROR 




4622 


46P0 


T$T»3 




4623 


4243 


4263 

/ 








/VERIFY THAT * 


«EAo DAT 






/^HEN FUNCTION 


* 2 


4624 


7501 


/ 

TSTV4, ci,A CLL 


I*C 


4625 


4445 


CLHALL 




4626 


1150 


TAO 


REQl 


4627 


3160 


DC* 


S0^ES2 


4630 


1160 


TAD 


CQRE62 


4631 


4421 


LDBUF 





/O'.K, 4096 LOOPS 
/ERROR, DATA BREAK 
/SCOPE LOOP POINTER 
/TEXT POINTtR 

/Te NEXT TEST 



/OCLR "CLR ALL" 
/CURRENT rJSLO 
/WOAO COMMAND FQR READ 
/9tVE AOORCSS 

/SETUP COMPARE RE6ISTER 
/SET VALUE 10 LOAD 
/L8*0 UPPER BUFFER 
/WEAK ENABLE 8!T 
/LOAD AND SO 

/iET DATA WORD 

/Save for error printer 

/CHECK 

/O'.K', 4096 LOOPS 
/ERRORi RATA BREAK 
/SCOPE LOOP POINTER 
/TEXT POINTER 



/□CLR 

/SET VALUE TCI LOAO 
/SgTuP COMPARE REGISTER 

/L6A0 UPPER RUPFER 



4632 
4633 
4654 
4635 

*e>36 

4637 
4640 
4641 
46<2 
4643 
4644 
4645 
4646 
4647 
46513 
46S1 
4652 
4653 



vi*2 

i%U 
70*0 
3000 
4443 

iB77 
4442 
1071 
4447 
73fi0 

1000 
31T0 
1170 
4432 
4427 
4430 
4624 
4263 



T94E;, 



CM* 

DC* 

UDCUR 

TAO 

TAD 

TAD 

tOMAN 

Ci.A CUU 

TAD 

OCA 

TAO 

ACCMPl 

NENROR 

ERROR 

TST94 

4263 



G0IICG2 



HONEMA 
K200E) 



K084e 



0 

OTRES 
OTREC 



CASE 1»52 



/§eT CUR«5NT AOO«ESS TO 0 
/CURRENT riELO 

/|,9AD COMMANC RE5|STER 

/5NA8l,r 9!«eAK 

/08 



/SAVE rOR ER»0» PRINTER 

/P!0 0 CWA^'CE 
/ALL 0',K. 

/ERROR, BAf A BREAK 
/SCOPE IBQf POINTER 
/TEXT POINUR 



/VEKJF-Y THAT A 
/WHEN FUNCTION 



REAo PATA 
» 3 



BREAK DOES OfClJR 



4654 


7301 


TSfVS, 


CkA CUI. 


SAC 


46S5 


4449 




CtHALL 




4656 


im 




TAD 


REe2 


4657 






OCA 


$0!tES2 


4660 


ii«0 




TAD 


00IIEe2 


4661 


4421 








466Z 


ii«0 




TAO 


CDREG2 


4663 


7040 




CMA 




4664 


3000 




b?A 


0 


4665 


4443 




UDOUR 




4666 


ii,r2 




ta5 


HQhCHA 


4667 


1(576 




TAP 


nete 


4670 


1077 




TAO 


K2e00 


4671 


4442 




UOCMD 




4672 


1071 




TAO 


K0g40 


4673 


4447 




I.DHAN 




4674 


7300 




CI.A CLl 




4675 


1000 




TAO 


0 


4676 


S1?0 




OCA 


OTREG 


4677 


1170 




TAO 


DTRE5 


4780 


4432 




ACOMPi 




4701 


4427 




NE«ROR 




4702 


4430 


T95t, 


ERROR 




4703 


4654 




TSt»5 




4704 


4263 




42*3 




4705 


5706 


/ 


JMP I 




4706 


5000 




TSTV7 





/peiR 

/SETUP COMPARE RE515TER 
/I.8A0 UPPEP SUFFER 



/SET CURRv T ADCKE»S TP 

/5URREWT rseto 



/UOAO eO«M(^NO REGISTER 
/SNABUe 8RFAK 



/|»VC FOP fRRC" PRINTER 

/gi!D 0 CwAiGE 
/Aui. 8',K, 

/ERROR, iJA'^A BREAK 
/SCOPt lOOP POINTER 
/TeXT POINTER 

/To NEXT TrST 



PACt. 
/ 

/VERIFT THAT A 
/WHEN FUNCTION 



KEAe DATA 
• 6 



BREAK DOES OCCUR 



PAL10 V142 



20.APH-73 



1117 



PACE 1»>3 



5000 
9001 
5002 
5003 
9004 
5005 
5006 
5007 
5010 
5011 
9012 
9013 
5014 
5015 
5016 
5017 
5eZ0 
50Zi 
5222 
5023 
5024 
5025 
5026 
5027 
5030 



7301 
4445 

1150 
3160 
1160 
4421 
1160 
7040 
3000 
4443 
U72 

1101 

1077 
4442 
1071 
4447 
7300 
1000 
3170 
1170 
4432 
4427 
4430 
50B0 

4263 



TSTV7, 



ci.* cut 


lAe 


/UCLR 


CtHAlL 


TAO 


RE81 




OCA 


GDREG2 


/SETUP COMPARE REGISTER 


TAU 


GDSEG2 








/UOAO UPPER RUFFER 


TAO 


S0REG2 




CHA 






DCA 


IS 








/SET CURRENT ADDRESS Tp 


TAP 


HOmEMA 


/CURRENT FIELD 


TAQ 


K40ae' 




TAO 


K280e 




UDCHD 




/UOAO COMMAND REGISTER 


TAO 


K0040 


/^NABUE BRfAK 






/(fO 


CLA CLL 






TAD 


0 




OCA 


OTREO 


/SAVE FOR ERROR PRINTER 


TAD 


DTBEC 


/DID 0 CHAN5C 






TERROR 




nCL O'.K'. 

/ERROR, DATA BREAK 


EHHOR 




TST97 




/SCOPE unOP POINTER 


4263 




/TEXT POINTER 



/ve«:ft that a k£A{5 data break oo|S occur 

/KHEN function « 7 



5031 


7301 


TSTVB, 


Ct* CLL 


!*e 


5032 


«445 




CLRALL 




5033 


1151 




TAD 


RES2 


S034 


3160 




05* 


GDREC2 


9035 


U60 




TAO 


C0REi;2' 


5036 


4421 




LOBur 


GDREG2 


5037 


11*0 




TAD 


5048 


7040 




CMA 




5041 


3000 




OCA 


0 


9042 


4443 




LOCUR 




5043 


UT2 




TAP 


HOMtMA 


5044 


1101 




TAO 


K4000 


5045 


1076 




TAO 


Ki0e0 


5044 


1077 




TAO 


K2ee0 


5047 


<I4<2 




UPCMO 




•»05g 


ISJl 




TAP 


K0e40 




4447 




LDMAN 






7300 




CL* CLL 




•5053 


1000 




TAO 


H 


•5854 


3170. 




OCA 


DTREG 


•5055 


llTa 




TAD 


OTREG 


9056 


4432 




ACCHPi 




5057 


4427 




NtKHOH 




5060 


4430 


T98E, 


ERROR 




5061 


5051 




TST98 





/PCUR 

/SETUP COMPARE REGISTER 
/i,8AD UPPER BUFFER 



/SET CURRENT ADDRESS TO B 
/guRRENT FlEtD 



/UOAO COMMAND REGISTER 

/ENABUe RRfAK 

/G8 



/SAVE FO" ERROR PRINTER 

/DID 0 CHANOf 
/AU'U 0',K, 

/ERROR, DATA BREAK 
/SCOPE LOOP POINTER 



2B«APH«75 



ll£7 



48*3 



/VFHIFV THAT AUl DATA BUfFtRS CAN B( 
/AT ONCE, ySE A RE4O BREAK AND ?ATT| 
/Al,!. gOMBlNATIONS', 



5068 


750X 


TST»V, 




!*C 


9064 


4445 




CS.HAUI 




5065 


ll5i 




TAO 




9066 


Si96 




OCA 


TCNTH4 


9067 


ll!7 




TAO 


H4 


9070 


3155 




OCA 


TCNTR3 


5071 


U56 


T99H1, 


TAD 


TCNTR4 


5072 


442i 




UOBUF 




507 J 


7340 




CU* CLL 


cm 


9074 


1196 




TAO 


TCNTR4 


5875 


31S6 




OCA 


TCl^TR4 


9076 


2155 




IS« 


TCNT93 


5077 


5271 




JHP 


T99R1 


9i00 


1191 




TAO 






Jl»S 




OCA 


8DREG2 


5|0g 


15,27 




TAU 


H« 


51B3 


55,55 




OCA 


TCNTR3 




11^2 




TAO 


HOHEHA 


5105 


4442 




LPOMD 






4443 


T99RZi 


UDCUR 




5107 


1071 




TAD 




5110 


4447 




(.OMAN 




9111 


7300 




CUA CLl 




9112 


100? 




TAO 


0 


9113 


31?B 




OCA 


DTREC 


5il4 


11?8 




TAO 


DTIlEi; 


9115 


4432 




ACCMPl 




5116 


7fti8 




SKf CUA 


T9»E 


9117 


5326 




JMP 


Size 


7340 




CUA CLU 


CKA 


91?1 


1160 




TAO 


COKECZ 


5122 


316e 




09A 


SDRC62 


9123 


2195 




ise 


TCNTR3 


9124 


5506 




JMP 


T9tRZ 


5125 


4427 




NERROR 




9126 


4430 


T99E, 


ERROR 




9127 


9063 




TSf99 




913B 


4263 




4263 





/OCUR "CUR AUU" 

/CSUNTER FOR • QK BUrFCRS 
/(.OAO UPPER ByPFER 

/» COUNT, SKIP WHEN syrrcRS fuul 

/SETUP FOR FIRST CNMPARE 

/CURRENT FfEUO 

/UOAO COMHANO 

/liOAO eURRCNT ADDRESS 

/eeT ENABue break 

/U8AO HA!NTE«J*NCE 

/5ET 0»TA 

/SAVE ro» PRINTER 

/CHECK 

/p;k. check •'EXT 
/ERROR OAT* n\ifrin9 

/5ETUF roR NEXT 

/O'.K, 4096 UOOPS 
/ERROR, -iA^A BUPI'ERS 
/SCOPE UOOP POINTER 
/TEXT POINTER 



/VEKIFT A WRJTE THgN RgAO BREAK FROM 
/LOCATIONS 7777 THEN 0000 OF TME 
/CURRENT neUD', USE PATTERS 0«7777, 
/ 

5131 7381 TST100, CU* CLU 1*6 

9132 4445 CURALL 

9133 4436 ENMANt 

9134 7340 CUA CUU CM* 

9135 4443 UDCUR 



/CLEAR CPN'K?U 
/ENTER M*I'-Trs*NCE 

/U8A0 CURRENT iOORESS 



PAUIH V142 



20iiAPK«73 



ll£7 



PACE 1«59 



9136 1191 

9137 3'>26 
9140 1172 



TAQ 
DCA I 
TAO 



RE02 

K7t77 

WOmEMA 



/STORE OUT BOUND DATA 
/CURRENT FtELO 



5141 
5142 
9143 
5144 
9145 
9146 
9147 
5150 
9151 
9152 
9153 
91S4 
9155 
5156 
9157 
5160 
5161 
91*2 
91*3 
5164 
9165 
91*6 
91*7 
S170 
5171 
9172 



1101 
4442 

1071 
4447 
7300 
Xi72 
4442 
1071 
4447 
7300 
2167 
7000 
1151 
31*0 

1000 

5170 
1800 
4432 
4427 

4430 
5131 

4243 
7301 
ll?3 
7690 
S424 



5173 5774 

5174 5200 



9200 



TAO 
UDCMD 
TAO 
UOHAN 
CUA CLL 
TAD 
UOCMO 
TAD 
UDMAN 
CU* CLU 
|S2 



K4000 



HOMEMA 
K0e40 



AOREG 



RE82 
GDREG2 



OTREG 



NOP 
TAD 
OCA 
TAO 
DCA 
TAD 0 
ACCMPl 
NERROR 
ERROR 
TStlBe 
4263 

Ci A Clu t*c 
TAB FueMAX 
SNA CUA 

JMP I 



XENO 



JMP I 
TSTIBI 



PAGE 

/ 

/veHlF-T THAT IJATA BREAK WQRKS 

/LOCATION 0000 IN *uu Existing 

/ySE DATA PATTERN 0000 «• 7?77, 



/HRJTE FUNCTION 

/UOAD COMMANtl RECJSTER 

/ENABUE BREAK 

/ISSUE MAINTENANCE lOT 

/READ FUNCTION 

/CURRENT FIEUD 

/U8A0 COHMANP REGISTER 

/ENABLE BREAK 

/ISSUE MAINTENANCE lOT 



/SETUP COMPARE 

/?TORE DAT* READ FOR PRINTER 

/CHECK RESULTS 
/O'.K', 4096 LOOPS 
/ERROR, WRITE OR RfAO 
/SCOPE POINTER 



/IS IT TEST EXTENDED H|M, 
/NO, END OF TEST 



/To NEXT Test 



WITH A XRITE FRQH 
ExtENOfP FjeUDS', 



5200 7301 TST101, cLA CLt 1*6 



9201 
5202 
5203 
9204 
9205 
5206 
5207 



4445 
4436 
11*4 
3225 

lirs 

3153 
1425 



CURALL 
ENHANl 

TAD 
OCA 
TAO 

DCA 
TAD ! 



Kcor 

T0FLD2 
FLOHAX 
TCNTRl 
THSFLD 



/ENTER Mil^TCNANCE MODE 



/START FIELD 0 
/FIELDS TO TEST -1 



S21i 
9211 
9212 

5214 
9215 
9216 
5217 
52Z0 
!Z2l 
5222 
5223 
9224 
5ZZ5 
9226 
9227 
5230 
5231 
5232 
9233 
5234 
5235 
5236 
5237 
9240 
5241 
5242 
9243 
5244 
5245 
92*4 
9247 
5250 
9251 
9252 
9253 
9254 



3227 
1150 
7110 
76S0 
7242 

si,»0 

4443 
1225 
7041 
1227 
7650 
5242 
U60 
7402 
5497 
7482 
1215 
0107 
1101 
4442 
1071 
4447 
4490 
44S2 
7*10 

S292 
7153 
7610 
9251 
1225 
laitft 

3289 
'114 
44Z7 
4430 
5800 
42i3 



9255 5»56 

9256 5400 



9400 



9400 7301 

9401 4445 

9402 4436 
94fl3 U<4 
9404 3226 
5405 1173 
9406 3153 
5407 1425 



DC* 
TAD 

Sil, Ci.* 
Ct.h CHI 
DC* 

TIB1« , l,DCUH 
T*6 

C|» 
TAO 

SN* CI* 

JHP 

T4U 

T0FuU2i HUT 

DC* 1 

t*D 
4ND 
T»0 

i.ogMD 

RpauF 

4CCMI»i 
SKP CL* 

JMP 

IS* 

SKP Cl,4 
JMP 
T*? 
T*D 

ogi 

ERROR 
TSTiei 
4243 

JM? J 

TSTie? 



lit? 



NEXF-U2, 



Tl31t, 



5DBEC2 

T0PUD2 

«Tfl.D2 

NEXFL.2 
CDREG2 



K0a70 

K4B0B 



neit 

tcntri 

TigiD 

T0?t.O2 

K0«ie 
TieiR 



.♦I 



/ 

PAGE 

/VERirr THAT 0*TA BREAK KQRKS 
/LOCATION 0000 IN ALL EXiJTING 
/ySE PATA PATTERN 2525 ♦ 5252, 

tst;02| cU* clu :ac 

CURAUL 
ENMANl 



/ySE PATA 7777 IF t I NK IS SET 

/SeTuP COMPARE reqjster 
/SET CURRENT AOOHESS TO BB00 



/YES, NOT TH!S ONE 
/PUTBOUN? DATA 

/HuotFiE'^ epf 

/STORE DATA 

/HOME epr 



/WRITE 

/UOAO CO-'MANn RECJSTER 
/fNABUE WRITE BREAK 
/SB 



/6lT RtS'JUTS 
/gwECK RCSUl,TS 
/O'.K, TRY NEXT 
/ERROR 



/PBNE WITH ALU 



/?ET TB NEXT riEUO 
/TRV (T 

/O'K 4899 LOfPS 
/ERROR, BATa break 
/SCOPE ueO^ POINTER 
/TEXT POINTER 

/TB NEXT Test 



WITH A WRJTE FROM 



/ocu« 

iNTE 



TAO 

OCA 

TAO 
OCA 
TikO I 



TOfLOS 
FUOMAX 

tcntri 

TH3FI.D 



/ENTER MAINTENANCE MODE 
/START FIEtD 0 
/FTEUOS TO lEST wX 



PAH0 V142 



20.APR<73 



P*BE 1»57 



941B 


3230 




OCA 


RTf LD3 


5411 


1150 




TAO 


REGl 


5412 


7U0 




CUU PAR 




5413 


7630 




Siil, ct* 




S4i4 


1113 




TAO 


K2S25 


9415 


1113 




TAO 


K2929 


5416 


3160 




054 


GPREC2 


5417 


4443 


T102R, 


I.DCUR 




5420 


1226 




TAO 


TOf ID3 


5421 


7041 




CJA 




5422 


12S0 




TAD 


RTPL03 


542J 


765? 




SNA CL* 




5*24 


5243 




JMP 


MExri.3 


5425 


11*0 




TAO 


G0REC2 


9426 


7402 


TOF'taj, 


Nt! 




5427 


3457 




OCA I 


K0000 


5430 


?402 


HTFl,03, 


WL,T 




5431 


1224 




TAU 


T0(^103 


9432 


0107 




AND 


K0a7C 


5433 


1101 






K4000 


5434 


44 4 2 




;|mo 




5435 


1071 






K0040 


9436 


4447 




(.OMAN 




5437 


4450 




ROBUF 




5440 


4432 




ACCMPl 




5441 


7610 




SKP CL* 




5442 


9293 




JMP 


T182E 


5443 


21S3 


NEXFU3J 


152 


TCNTRt 


5444 


7610 




SKP CL* 




5445 


9252 




JMP 


Tla20 


9446 


1226 




TAO 


T0?LD3 


5447 


106 6 




TAO 


KBBte 
T0?U03 


5450 


3226 




DC* 


S46i 


5217 




JMP 


Ti02R 


5452 


4427 


11020, 


NERROR 




94S3 


4430 


Tt02E, 


ERROR 




5454 


5400 




TST102 




94.55 


4263 




4263 





/RETURN fltU'' CDF 

/VSE DATA 5252 IF |,INK IS SET 

/§ETUP COMPARE RECJSTER 
/SET CURRENT ADDRESS U 0BBB 



/CURRENT FIELD 
/YES, NOT THIS ONE 
/OUTBOUND OAT* 
/MSDiFtEp epF 
/|TORE DATA 
/HBHE CDF 



/WRITE 

/(.BAD COMMAND RESJSTER 
/iNABLf WRITE BREAK 
/?0 

/GET RESULTS 
/CHECK RESULTS 
/O'.K", TRY NEXT 
/|,RROR 



/PBNE WITH ALL 



/SET TO NEXT FIELD 
/TRV IT 

/9',K 4B»6 LOOPS 
/ERROR, DATA BREAK 
/ieOPE LOOP POINTER 
/TEXT POINTER 



/VEHU'T THAT pATA BREAK WORKS 
/LOCATION 7777 IN ALL EXISTING 

/gSt OAT* PATTEHN 8000 ♦ 7777, 



WJTH A WRjTE FROM 
EXIENDID FIELDS', 



9456 


7301 


TST103, cL* CLL 


SAC 


/OCLR 


f4S7 


4445 


CLHALL 




9460 


44S6 


ENMANl 




/ENTER MAINTENANCE MODE 


5461 


1144 


TAD 


KCDF 


/START FIELD 0 


5462 


3304 


DCA 


T0FLD4 


9453 


1173 


TAO 


FLDMAX 


/FfELPS TO TfST .1 


5464 




OCA 


TCNTRI 


9465 


1423 


TAO J 


THSFLO 




9466 


3306 


OCA 


RTfLD4 


/RETURN FIE1.D CDF 


9467 


1150 


TAO 


REei 




5470 


7110 


CLL R*R 






5471 


7630 


SiL CLA 




/ysE DATA 7777 IF LINK 







20iiAPFi« 


73 




5472 












3160 










T240 










? ttJ 














TAD 


T0f^L04 








C i * 










T io 


RTf 1.04 








SN* CU* 






A ^ 




JMC 


NES(ru4 


? ^ 0 3 


11 e0 




TAO 


GOftECZ 








H^T 




i% n [5 






DC* ! 


K7777 




7402 




T 






1 S0 4 




T^O 


T0?L04 


^ ^ X 0 


J 




ANU 


K2e70 




1 1 c X 




T*0 


K4g00 




4 4 4 2 








?!SX 3 


ISTl 




TAD 


K0040 




4447 










4450 




ROBUr 






t 




*CCMPi 




9317 






SKP CU* 






^3S1 






Tle3E 








152 




5522 






SKP CL* 




5523 


5330 




vlHP 


T1S3D 




1304 




TAO 


TOf L04 








TAP 


K2Si0 




3304 




bCA 


TOf LD4 


952* 


52T4 




JMP 


TiaSR 




44?7 








5931 


4430 








5332 


5496 




TST3.B3 




5S33 


4243 




4293 




5534 


S739 


/ 


JMP S 


,+i 


5SS5 


5600 


/ 


TSTiB4 






5*00 


P*Gt 







OAGE i«5S 



/fETUP CCHP*SE RESISTED 

/sei CURRENT AHDMESS to 7777 



/CURRENT rULD 
/TfS, NOT THIS ONE 
/OUTBOUND DATA 

/leoiflEf^ car 

/STORE DATA 
/HUME cor 



/WRPE 

/yOAO eOMMANO REStSTER 
/^MABLr WHITE BREAK 
/98 

/GET Resuui's 

/CHECK RCSUUfS 
/O'K', TRV NgXT 
/gRROR 



/DONE WITH All. 



/set TO NEXT FIELD 
/TRY IT 

/O'.K 4096 LOOPS . 
/(RROR, DATA BREAK 
/SCOPE UOOf POINTER 
/feXT POINTER 



/I8 NEXT TEST 



/VEHirT THAT pAT* SReAK WORKS 
/UOp*T!OM 7777 IN 4ul EXISTING 
/USt UAT4 PATTERN 2525 ♦ 5Z5Z, 



WITH A «RlT|; fRQM 
ExIENOtO riELOS", 



S600 


7301 


TSTltM, CI,* CLt 


i*e 


56P1 


4445 


CtRAUU 




•S6ei2 


44S6 


ENMANl 


KCOf 


9603 


U44 


TAO 


96et4 


3227 


OCA 


T0PU05 




U73 


TAO 


FUOMAX 


S6P6 


3153 


OC* 


TCNTRl 


56PI7 


1425 


TAO J 


THSrUD 


56ie 


32JI 


DC* 


RTftOS 


5611 


use 


TAO 


RESl 


5612 


7110 


CUU RAH 





/OCLR 

/ENTER MAINTENANCE MOOt 
/START riELD I 
/FIEUOS TO TEST 'l 
/RETURN riEUn COF 
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ll£7 
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5613 

5614 

5615 

5616 

5617 

3620 

5621 

5622 

56?3 

56?4 

5625 

5626 

5627 

5630 

5631 

5632 

5633 

5634 

5635 

5636 

5637 

5640 

5641 

56*2 

5643 

564* 

5645 

5646 

5647 

5650 

5651 

5652 

9*53 

9654 

9655 

5656 



7630 

1113 

1113 

3160 

7240 

4443 

1227 

7B41 

1231 

7650 

5244 

1160 

7402 

3526 

7402 

1227 

0107 

1101 

4442 

1071 

4447 

4490 

4432 

7610 

5254 

2153 

7610 

■5253 

1227 

1866 

3227 

5Z17 

4427 

4430 

9600 

4%«3 



5657 
5660 
5661 
5662 
5663 
5664 
5669 
5666 
5667 
5670 
5671 
5672 
S67S 
9674 



1144 
53PB 
UTS 
3153 
1425 
5324 
U90 
3160 
7J01 
4445 
4436 
1300 
7041 
1324 





SiL Ct* 






TAO 


K2529 




TAD 


K2929 




OCA 


CDRCG2 


T104H, 


Ct* CHA 






locur 






TAO 


TOlfUOS 




CJA 






TAO 


RTrL05 




SNA Ct.A 






JMP 


NEXFL5 




TAO 


G0REC2 


TOPUOS, 


• HU! 




OCA I 


K7>77 


RTFUDS, 


HUT 


T0PU05 




TAO 




ANt3 


K0e70 




TAO 


K4800 




LOCMO 






TAO 


K0040 




|,OHAN 






ROBUr 






ACCMPl 






SKP CU* 






JMP 


Tla4E 




> IS< 


TCNTRl 




SKP CU* 






JMP 


T104O 




TAO 


T0<»U05 




TAO 


K00t0 




05* 


T0*t.09 




JMP 


T104R 


TilS4D| 


N^RHon 




T104E, 


ERROR 




T$Tie4 






426} 





/gsE OAT* 52^2 I"" tlN^ IS SET 

/SETUP cr'^P*''E REGISTER 
/SET CUR»E«JT AOOKESS TO 7777 



/CURRENT FULD 
/YES, THIS ONE 

/OUTBOUIv!> OaTA 
/(1t5Dtf"!Er> CO'' 
/§TOSE DATA 
/HOME CDF 



/WRITE 

/LOAD eOXMANO REGISTER 
/^NABUE WRtir 9REAK 
/GO 

/GET RESULTS 
/CHECK RESUUTS 
/O'.K, TRV MtifT 
/ERROR 



/goNF Hl»H ALL 



/IgT TO vexT rjELO 
IT 

4P96 U3'5R' 
, ERROR, ?AT» BREAK 
/SeOPE LOOP POINTER 
/ieXT POINTER 



/T«T 

/O'.K 



/VERITY THAT o*T* 8RE*K WORKS FROM ALL LOCATIONS 

/IN AUL Existing ExTenoed riEuos, 

/use DATA PATTERN ALL COMBINATION! 
/ 

TSTieSi TAD KC6F 

TOfLDl 
FU6MAX 
TCNTRl 

THirtD 
KTfUOl 
RE61 
CORE r. 2 
SAC 



TiPSH, 



TAD 
OCA 
TAO 

OC* 

T*D \ 

DC* 
TAD 
DC* 

CU* CLL 
CL«*LL 
ENMANl 
TAO 
CI* 
TAO 



/SETUP COHRABE REGISTER 



/oeuR 

/EigTER MAINTENANCE MODE 



TOFUOl 
RTPUDI 



PALIB V142 



9673 


7S50 


5676 


5334 


9677 


Hi0 




0B00 


5701 


5591 


9702 


1380 


5703 




9704 


1101 


5705 


44*2 


5706 


1151 


9707 


4443 


5710 


1071 


5711 


4447 


5712 


7301 


5713 


13.91 


9714 


3167 


5715 


1300 


5714 


3107 


5717 


4443 


5720 


lefi 


5721 


4447 


9722 


7300 


5723 


1547 


S724 


3000 


5725 




5726 


1170 


5727 


4432 


S73e 


7610 


5731 


5344 


9732 


2i6B 


9733 


7000 


9734 


?i93 


5735 


7610 


9736 


9343 


9737 


1300 


5740 


1066 


9741 


3300 


974Z 


9267 


9743 


4427 


9744 


4430 


9745 


9697 


9746 


4263 


9747 


4576 


5750 


' 1175 


5751 


3526 


9752 


4494 


9753 


4451 


9794 


7321} 


9755 


7604 


9796 


7004 


9757 


7700 


9760 


7402 


9761 


7J01 


9762 


4445 



20»APR" 


73 


ill? 




SNA CI* 












TAO 


G0REG2 


Tort,oi, 








og» 5 


RE62 




TAD 


T0?UD1 




ANQ 


K0B70 




tAO 


K4a00 




UOCMO 






TAO 


RE62 




UOCUR 






TAD 


K0040 




1.0HAN 






CUA CLt 


I AC 




TAU 


RE02 




DCA 


AOREC 




TAO 


TOfUOl 




AND 


K0B7e 




UOCMO 






TAO 


K0040 




t,OMAN 












TAO I 


AOREC 


RTFLDl, 








OCA 


OTHEG 




TAO 


OTREC 




ACCMPl 






SKP CUA 






JMP 


T109E 




ise 


GD^EC2 




NOP 








TCNTRl 




SKP CUA 






JMP 


T105O 




TAO 


TOfUOl 




TAO 


K0ei0 




d;a 


TOfLOt 




JMP 


T183R 


T10SO, 


NEHROR 




T10SE, 


ERROR 




TST105 






4263 




/ 






ENOTST 


1 JM? t 


XSjT 




TAO 


SAuEnD 




DCA S 


K7n7 



PRNTER 
TEXEND 
U*S 
RAU 

SMA CUA 
ENOHUT, MU! 



/is I? CUR»E».'T rSEUD 
/TESi BYPASS 

/MSDtFIEn cof 
/STQRE DATA WORD 

/MsSK ir Bits 

CO^MiNT REGISTER 

/'^QkO CURRENT 400RESS 
/ENABUE RSeAK 

/SeTUP S»EAK TO ADDRESS 

/MASK rit\,r> RifS 

/U8A0 HAINf E'^ASJCE 
/q?r DATA «E4D 

/tpuRRENT ntiD cor 

/STORE fftR PRJMTER 
/?HEeK RESULTS 

/Tuts Pipuo a."*, 
/ERROR 

/yPOATE HORO 



08NE 



/TRY NEXT FICUO 
/O'.K, NEXT AODRESS 
/ERROR, DATA 9REAK 
/SCOPE LOOP POINTC 
/TEXT POINTER 

/Setup fieuo b 

/REPLACE BtNARy 

/PRJNT END or TEST MESSAGE 
/POlNTEB 



CUA CLU UC 



/END OF TEST 

/pcup 



PAUiei V142 



20bAPR»73 



HIT 
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5763 5764 
9764 eg56 



6000 



JMP t 
TSf4 



/UOOP ON I»R0GR*M 



men 


7301 


6001 


4445 


6002 


4436 


6003 


1072 


6004 


4447 


6005 


52114 


6006 


52J4 




6S(<0 


6200 


0000 


6201 


73P0 


6202 


1600 


6203 


333 S 


6204 


7604 


6205 


7700 


6206 


5216 


6207 


7604 


6210 


70?6 


4211 


7710 


4212 


5759 


6213 


1074 


6214 


4426 


S215 


57SS 


»216 


2100 


6Z17 


4454 


6220 


4454 


62Z1 


1680 


42Z2 


?141 


6223 


1343 


6224 


3225 


6225 


7402 


6226 


3230 


6227 


4451 


*230 


7402 


6231 


4454 


6232 


4491 


6233 


7136 


6234 


7340 


6235 


1200 



PAQt 

/MANUAL TEST fOH 14 BJT COUNTER, 

/SET SwITQK RECISTER TO 0201 AND PRESS 

/UOAU ADDRESS, SET THE SWSTCH RtClSTEK TO 001710, 

/THIN PRESS CLEAR 4N0 CONTINUE, 

/SCOPE THE"i*TW CA8RV OUTPUT TEST POINT 

/FOK A GROUND TO *S VOUT SICNAUi 



MANJLl 



CL* CUL 

CLRALL 

ENMANl 

TAO 

UDMAN 

JMP 



1*C 



K0i00 



/SUdRQUTjNE FO" 
/ERHOR TyPtOUTS, 



ERROi 



cu* cuu 

TAO J 

DCA 

U*S 

SMA CU* 
JMP 

UAS 

RTk 

SPA CU^ 
JMP J 
TAO 
TYPE 

gMP I 

I Si 

CR|,F 

CH\,f 

TAO I 

AND 

TAO 

DCA 

HU! 

DCA 

PRNTER 

HU! 

CRUf 

PRNTER 

TEXPC 

CU* CUU 

TAB 



ER«0 
8ERR0 



,*£0 



S6RR0 
KB287 



SEtiRO 
ERRO 



ERRO 

Ke917 

HEQTAD 

.*! 
1*2 



CMA 
EHRO 



/FIRST, CUE*" CQNTROU 
/ENTER MAINTENANCE HOP? 
/6NABUE SHJFT PULSES 
/ISSUE MAINTENANCE JOT A^O 
/CAUSE HI MAIN SHJfTf TO THE 
/INPUT OF T^r 16 BIT COUNTER, 



"ERRoRSr" Scope uoopsi anq 



/SET sco^e loop pointer 

/SAVE POn RETURN 

/5ET SWRS! 

/IS IT SCOPE UOOP 

/N8 SCOPE 

/«ET SWITCW 2 

/INHIBIT EPROR BEUU 
/YES 

/NO 



/5ET TEXT POINTER 
/MASK g«il 

/MAKE ERRQR MEAOER TaO 
/MOOlflEP WtAOER TAO 
/M80IFIED NEAOER POINTER 

/PRJNT PCI 

/GET PC POINTER 



6ZS6 
*Z37 
6240 

«2«2 



*452 
1600 

9256 



ill? 



T»D J ERRO 
CWt, PAU 

JM»< NT6D 



/PnlHl Pr STORED 



/NOT OBI RE6ISTEK 





3tK0 


p ^ ^ 4 


4491. 


6 2 ^ § 






1 2 ? V 




7700 


A T S£ (« 
© d 5 ^ 






7 


62S2 




62S3 




6254 


J. ^ ^ ^ 
# ^ ^ ^ 




7§ J0 


*296 


3200 


6297 




52*0 


7104 


62*1 


7420 


6262 


9273 


6363 


32?0 


6264 




62*5 


71*2 


62^6 


1161 


&Z^7 


f « « ^ 


62^0 


1162 


6271 


4452 


62^2 


7^10 






62 '4 


1 JO / 


6275 


3342 


6276 




6277 


3010 


63f'^0 


112 5 




3341 


« 


^ £ 17 


63^53 


7900 




5327 


63K9 


7104 


63ei6 


3200 


63ei7 


J342 


6310 


2342 


6311 


2342 


6312 


3314 


6313 


4451 


6314 


■' 4 ? 2 


6315 


1410 


6316 


4452 


6317 


2341 


6322 


5302 


6321 


1175 


6322 


3526 



NTGO( 



f»KNTER 
T|X6D 
TAO 

JHf» 
T*0 
TWOCT 
T*0 
OCTEL 
SKP CL* 

oc» 

TAD 

SNt, 
JMP 
DC* 

PRNTER 
TEXCR 
TAO 
TWOCT 
TAO 
OCTEI. 
SKP CL» 
NTCKC, PC* 
TAD 
DC* 
TAO 

oe* 

TAD 
05* 

ST«AIJT( TAP 

SHA 

JMP 

CIL RAU 

D5A 

TAP 

ise 

IS! 
OCA 

PRNTER 
TAO I 

octtu 

BAKPMTi IS* 
JMP 
TAD 

DC* : 



1*3 

CDHECl 



GDREC2 



tRRO 
ERRO 



NTCRC 
ERRO 



CRREGl 
CRREG2 



ERRO 
XTEXT 

pcntrz 

XRCC 

Aufote 

K7>7i 

PCNTRI 

ERRO 

NOtEX 

ERRO 
PCNTRZ 
PCNTRZ 
PCNTRZ 



AUTOtZ 

PCnTRI 
STRAUT 
SAVEND 
K7»77 



/PRlMT C5I 

/WAS IT A « RJT 05T*l, <»YTE 
/N8 

/CPT DATA 
/PRINT TWO OCTAL 

/PRINT regR octau 

/5ET TEXT POINTER 



/PRINT C«l 
/PRINT 

/PRINT FOUR OCTAL 



/COUNTCR POR » or HEAD? 
/SeT TEXT POINTER 

/NOT THIS ONE 



/((ET TEXT MESSAGE POINTER 



/STORE fOR PRNTER 
/PRINT XX| 

/MOOIPIEP TEXT POINTER 

/PRINT FOgR OCTAL 

/CHECK FOR NEXT XXI 
/5eT CONSTANT SAVED 
/REPLACE L*F LOCATION 



ALie 


V142 


20.APH. 


73 




6323 


7402 


Ei,HLT«l 


WWT 


xoyHP 


6324 


47S6 




JMS I 


6325 


57S5 




JNP J 


SERRO 


6326 


5?»6 




JMP 


NTaO 


6327 


71H4 


NOTEX, 


CLL RAL 


ERRO 


6330 


me 




OCA 


6331 


2342 




ISi 


PCNTRZ 


6332 


33*2 




IS? 


PCNTRZ 


6333 


2010 




IS« 


AUTOt0 


6334 


9317 




JHP 


BAkPNT 


6335 


1B00 


/ 

SERHOi 


0 




6336 


6746 


XOUMPi 


oyMP 




6337 


71*4 


xTExT, 


TExST 




6340 


0162 


XREGi 


CRHEr.2 




»341 


0000 


PCNTHli 


1 0 . 




6342 


3000 


PCNTRZi 


1 0 


HE8UST 


6343 


13*4 


HEOTAO, 


, TAO 


6344 


7162 


HEOLST, 


1 ERTXi 




6345 


7175 




ERTX2 




6346 


7211 




ERT X3 




6347 


7227 




CRT X4 




6390 


rz«e 




ERTX9 




6351 


72SZ 




ERTXa 




6352 


7264 




ERTX7 




6353 


72T4 




ERTX8 




4354 


7307 


/ 


ERTX? 






6400 


PACt 







PABE 1<69 



/ALL rEC(5V^K*BLE Error HALTS 
/(JMECK FfiR SET ALL REGISTERS 
/TRY SAME TEST AGAIN 
/(JET AUL REGISTERS 



6400 Z000 

6401 7300 
640Z 1105 

6403 3215 

6404 6001 

6405 2215 

6406 9205 

6407 6002 
6410 5600 
'6411 9200 

6412 44*1 

6413 7402 

6414 5600 



4415 fate 

6416 3171 

6417 1171 



/SUBROUTjNi; TO WAlf rOR INTERRUPTS 

/[r interrOpt occures go back 4ii 
/ 

tON»<T, 0 





CL* CLL 






TAO 


K7700 




DC» 


COmPI 




ION 






|S« 


COmPI 




JHP 






lOF 






JHP I 


lONHT 


INTAPOj 


S5i 


JONWT 




DSKSKP 




ERHLTl, 


HLT 








SONWf 



/ROUT r-L TO COMPARE AC TO GD^EGZ 
/ 

COHPi, 



0 
OCA 
TAO 



ACrEC 

ACRES 



/TURN IT OW 



/TURN IT orr 

/NO INT oeeuRED 

/BISK SKIP IPT 

/error, ILLEGAL INTERRUPT 

/EXIT 



/SAVE AC 



6420 ye*% 

»422 7640 
64Z4 S615 



6417 



Cl* 
TAD 
S2A 
ISi 
JHP 

/ 

/RoyUNE TO 

/CDKtCi AND 
/ 



01.* 

CQMPi 
I COmPI 
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/SKJP !F 0',K', 

/gRRDR, DONIT COMPAR? 



COMPARj cRRECi *N0 c'^'ECS To 
60RE82, 



6«25 


?a00 


C0MP2| 


e 






6« 26 


7300 




Cl* 


cu 




*«2? 


U57 




TAD 




GOREri 


64 J0 






AND 




K0ai7 


64^1 


7B41 




CSA 




CRREGl 


6432 


U61 




TAD 




64^3 


7640 




SgA 


ct* 




6434 


5241 




JMP 




CR2RR 


6435 


U»2 




TAB 




CRRE52 


6436 


7041 




CJA 




G0REG2 


6437 


1160 




TAO 




6440 


7640 




S£A 


cw* 


C0MP2 


64«1 


222$ 




158 




64«2 


5685 




JMP 


I 


C0MP2 



/SUHKOUTINE TO REAft STATUS RECJSTgR 



64^2 :"030 rqsT) e 

6444 6745 10T5, DRST 

6445 745,e SKP 

6446 74Z2 ERWUT>| »ll 
3143 ' DC* STULC. 
il6j TAO STREC 

6491 5643 JMP I ROST 

/ 

/SUBHQUTlNt 
/ 

64SZ 3000 UDC** 2 

6493 3167 OCA AOREG 

6454 1167 TAO AOREC 

6455 67*4 10T4| OtCA 

6496 5652 JHP J UDe* 

6497 7402 ERHUT41 H|.T 



/NOT THE SAME 



/ERROR, NOT THE SAME 



/R|AD STATUS loT 

/|KIP TRAP 
/SAVE RESULT* 



/SXIT 

TO UOAq current AooRESS RtClSIsR 



/Siyt IN AOORESS 

/UOAB CURRENT ADDRESS lOT 
/5XIT 
/SKIP TRAP 



6460 0000 

6451 31*6 

6462 1166 

6453 6743 

6464 $662 

6465 7402 



/SUBROUTINE TO 1.0*0 CiSK AqoRESS REGISTER 



UD*Oi 0 

DCA 
TAO 

lOTJ, 01.AG 
JMP 

/ 

/SUB«0UTINE 
/ 



OAREC 
DAREr. 



I LOAD 



/SAVE OgTSOgND DATA 

/LOAO DISK AOORESS REBJSTER 
/EXIT 
/SKIP TRAP 



TO WOAo COMMAND RESISIeR 
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6466 ?000 

6467 3165 

6470 1165 

6471 6746 

6472 5666 

6473 7402 



6474 0000 

6475 6741 

6476 7410 

6477 2274 
6500 5674 



I0T6. 



LOCm» 0 

DCA 
TAO 
OlpDC 
JMP I 
ERHUT6, HUT 

/SUBROUTINE TO ISSUE "qSKP" OlSK SkjP IOT 
/ 



CMREC 
CMREG 



LOCH 



SqKPi B 
lOTli OSKP 
SKP 

ise sokP 

JMP I SDkP 

/ 

/SUBROUTjNt TO ISSUE 



/SAVE OUTBeUMO DATA 

/tOAO COMMAND REGISTER 
/EXIT 

/SKJP TRAP 



/DISK SKIP fOT 
/DID NOT SKIP 

/tXlT 



"OCIR" CUE*" IOT 



6501 0000 

6502 6742 

6503 5701 

6504 7402 



CI.D«> 0 
I0T2. DCj^R 

ERWUT2, HUT 



I CUOR 



/^KJP TRAP 



/o?iR "Clear iot" 

/ES|T 



/SUBROUTINE TO ISSUE "DMAN" MAJNTeNAScE !0T 



6505 


?000 




0 




6906 


6747 


lOT7, 


OmAn 




6507 


5705 




JMP I 


UOMN 


6510 


7402 


ERHUT^i 


1 HUT 








/SUBROUTINE TO 


ShI?Ti 1 






/ADDRESS INTO DATA BUFI 


6511 


0000 


r 

RpApi 


0 




6512 


4437 




ENMAN2 




6513 


liS0 




TAO 


H5 


6514 


3152 




OCA 


SSCNTl 


6515 


10^6 




TAO 


Ki000 


6516 


1073 




TAD 




6517 


4447 




UOMAN 




652S 


2192 




15« 


SBfiNTl 


65Zi 


9517 




JMP 




6922 


7300 




CUA CkU 




6523 


1131 




TAD 


M7 


6524 


3152 




OCA 


SBCNTl 


6525 


1076 




TAD 


K1B3P 


6S26 


4447 




(.OMAN 




6527 


2152 




I5« 


SBCNTl 


6530 


5326 




JHP 




6531 


733a 




CI.A CLU 




6532 


1067 




TAD 


K0820 


6533 


4447 




UPMAN 




6534 


3166 




OCA 


QAI^EC 



ReAo disk 

12 JHltTS 



/"gnAN" MAINTENANCE lOT 
/fXlT 

/SKIP TRAP 



/ENTER MAINTENANCE MOp? 4i 084«t 

/SETUP csgfgTER 

/ENABUE SHIFT CRC 

/tVABUt SHirT SUHPACt AND SECTOR 

/UOAD MAtNTEiWANCE 

/F9UR SHIPTS 

/MORE TO GB 



/fMlFT CRC 

/UOAO MAINTEMAMCE IOT 



/SHIFT 1? SITS 



/READ DATA BUFPEH 
/SAVE RESULTS 



my 



6535 



4&37 
A540 

6542 

6§«3 
6544 
65«5 

6s«a 

6547 

6S50 



1166 
5711 



7330 
44*7 
1067 
4447 
31*4 
1164 
3172 
1170 
5737 



6»91 0B@B 



6567 ceeB 

6970 7930 

6971 4447 

6972 7900 
6573 5767 



6620 1909)0 

66("1 4437 

66B2 11S2 

6603 3152 

6604 1076 
65B5 4447 



Tad 



DAHEC 



/SU8K0VT1NE TO «C*0 D*T* BUFFER TO *C 



CL* Cli. CHU R*R 
UOHAN 



TAD 
UDMAN 

05* 

TAO 

D5* 
TAO 



K0g20 

D6REG 
D8AEC 

DTHEG 
OT»EG 
HOgF 



/feNTER HAJNTENANCE MOIJE 
/teAO MAINTIMANCE 



/exiT 



/SUBROUTINE TQ SHJpT COMMAND RE8JST5R TO 

/OAT* BUFFER T«tN READ DATA BUFFER 

/ 



4952 


4437 


EnmAn2 




65SS 


11S2 


TAD 




6S54 


3192 


OCA 


SBftNTl 


6SS5 


1B75 


TAD 


K048e 


6656 


4447 


tPMAM 




6557 


2152 


ISi 


SBCNTt 


6560 


9356 


JMP 


1-2 


6561 


7300 


Cb,A CLI, 




6562 


1067 


TAO 


K0020 


6563 


4447 


UOMAN 




6564 


3165 


OCA 




6565 


1165 


TAD 


CHREC 


6566 


S7S1 




ROCM 



/Enter maintenance hooe ♦ ob4»i 

nt BIT SHJfT 

/(nable diT row sHirr qomhano 
/bOAO ANn 00 

/fHlFT 13 

/gMABUe READ BUFFER 

/loao and so 
/Save it 

/exiT 



/ROWTINE TO ENTER MAINTENANCE MODE 
/ 

HAtNli 0 



CUA CUL CML RAR 
UPMAN 
CI.A CLU 
JMR I MAfNl 

/ 

PACE 
/ 
/ 
/ 

/SUBROUTINE TO SHirT c«C REClST£R TO oATA 

/BUf^f^ER THEN READ IT, 

/ 

rdcr» " 



/ENABLE MAlNTfNANCt BIT 
/(NTER HttNTENANCe HOPE 



EnmAn2 

TAD 

OCA 

TAD 

(.OMAN 



«12 

SBfiNTl 
K1800 



/6nTER MAtMlENANCE MODE ♦ 0B4*i 

/iZ SHIFTER 
/ENABLE SHIFT CRC 
/LOAD AN5 80 



AL10 


V142 


20arAPRB73 


lli7 


6606 


2152 




sBCNTt 


6607 


5205 


JMP 


i"2 


6610 


7300 


CI,A CLt 




6611 


1067 


TAO 


K0020 


6612 


4447 


UDMAN 




6613 


1142 


OCA 


CRREC2 


6614 


44S7 


ENMAN2 




6615 


11S2 


TAO 


H12 


6616 


3152 


OCA 


SBCNTl 


6617 


1076 


TAO 


K1«00 


6620 


4447 


|,OMAN 




6621 


2152 


ise 


SBCNTl 


6622 


5220 


JMR 


i«2 


6623 


7J0B 


CUA CLU 




6624 


1067 


TAO 


K0e20 


6625 


4447 


1,0KAM 




6626 


0141 


AND 


K0017 


6627 


3161 


OCA 


CRRECl 


6630 


5600 


JMP J 


ROCR 






/ 

/SUBROUTINE TO 
/ 


PRJNT Til 


6631 


0000 


TOCT» 0 


SBfiNTl 


6632 


3152 


OCA 


6633 


1192 


TAO 


SBCNTl 


6634 


7010 


HAH 




6635 


7012 






6636 


0065 


AND 


K08gT 


6637 


1056 


TAO 


Kil60 


. 6640 


4426 


TTRE 




6641 


1152 


TAO 


SBCNTl 


6642 


0065 


AND 


K0J07 


6643 


1056 


TAD 


K0263 


6644 


4426 


TYPE 




6645 


5631 


JHP I 

/ 
/ 


TOfiT 






/ 

/ROUtjNE TO DO 
/ 


CRU^ 


6646 


0000 


UPONEi a 




6647 


7300 






6650 


1142 


TAD 


K0215 


6651 


4426 


TYPE 




«652 


il43 


TAO 


KB412 


6653 


4426 


TYPE 




6654 


4426 


TYPE 




6655 


5646 


JHP ; 








/ROUTINE TO PRINT FOUR 


6656 


0000 


FROcTi e 




6657 


7006 


RTU 




6660 


7006 







PACE l-e? 



/12 BIT SHIFT 
/ENABLE RfAO BUFFER 
/?AVE IT 

/ENTER MAINTENANCE MODE *■ DB4»l 

/;? BJT SHIFTER 
/gNABUE SHIFT CRC 
/UOAD ANP fib 

/« BIT SHIFT 
/InABuC reap 3UFFKR 



/SAVE OTHER WAUr 
/EXIT 



/$AVE AC 



/PRJNT FIRST BVTE 



/PRINT SECBNO BIT 
/tXlT 



/TYPE ONE NUUU 



$6Sl 
6662 
«.653 
6664 
6665 
4666 
6667 
6670 
6b7i 
6672 
4673 
4674 
667S 
6676 
4677 

tree 



6701 
6702 
6703 

6704 
6705 
8706 
6707 
6710 
6711 
6712 
6713 
6714 
6715 
6716 
6717 
6720 
6721 
6722 
6723 
6724 
672S 
6726 
6727 
6730 
6731 
6732 
6733 
6734 
6735 
6736 



3«46 
1124 
3g3t 
1246 
0069 
1056 
4426 
1846 
7B06 
7804 

n*i 

S244 
1895 
4426 
5656 



0000 
7300 
1701 

2301 
3256 
1656 
0105 
7450 
5335 
7900 
7020 
7B0t 
7012 
7012 
7012 
4426 
1656 
0X10 
7450 
55S5 
Ut5 
7500 
1120 
1055 
4426 
2256 
7300 
5306 
7300 
5701 



DC* 
TAP 
DC* 
T*p 
ANQ 
TtO 

T*? 

RTl, 

RA), 
OCA 
|S« 
jnp 

T*5 
TYPE 



ii£7 

UPeNE 
K7?7« 
TOeT 

K0g07 
K0260 



UPONt 

TOfiT 

,"U 

K0240 
FRflCT 



PACE i>6B 



/SUBROUTlNt TO PRINT TeX? 
/ 

PRN, 0 



ClA Cut. 
TAD 1 



tSE 

05* 

TAO I 

*N0 

SNA 

JMP 

SHA 

iA5 

RIP 
RTR 
RTR 
TYPE 

SNA 
JHP 
TAO 
SKA 

lit 



EXIT, 



TYPE 

IS2 

CI.A CLl. 
JMP 

c^A cut, 

JMP I 



PRN 

PRN 
FRSCT 

rRecT 

K7t00 

ex!T 



TROCT 
K0077 

EXIT 
K3T40 

K4I00 
K0240 

rsocT 

PRN*5 



/6ET POlNTrR 



PRN 



/routine; to TYPt 



6737 0000 
6740 6046 



PRJNT, 



0 



PAH0 V142 

6741 6041 

6742 53*1 
4743 4842 

6744 7200 

6745 5737 



20.»P«'.73 



?00i miB 

7881 7330 

yeez 4447 

7003 7810 

7gB4 <447 

7205 7300 

7006 S600 



7007 2000 

7010 7504 

7011 JS073 

7012 7650 

7013 5217 



TSF 

JMP 



XH7 



PA«E 1»69 



t PRINT 



/RoyTjNE TO cet *ul Registers »FTfR "fRHUl'" 



DUMP, 



6747 


7604 






6750 


?l@75 


km 


K0400 


6751 


7650 


SNA CI,A 




6752 


5746 


JKP 1 


DUMP 


6753 


4434 


RpSTiT 




4754 


<45e 


RQBUF 




6759 


7300 


CL* CLt 




6756 


1132 


TAD 


Mil 


6757 


3337 


DC* 


PRINT 


6760 


1073 


TiO 


K0t00 


»76i 


4447 






67*2 


2337 




PRINT 


6763 


5361 




,'2 


S764 


7300 


Ct,A CI,U 




«765 


1047 


TAO 


K0020 


6766 


4447 






6767 


3166 


D?A 


DAKEG 


4770 


4446 


ROCRC 




6771 


4435 


ROCMD 




4772 


4454 


CRj,F 




6773 


mi 


TAD 


K7«00 


6774 


2J«4 


ISl 


DUMP 


6775 


5746 


JMP I 


DUMP 



/MASK SMtTCH 3 
/WAS IT .r.et ALU 

/m 

/5ET SYATU8 
/HEAD BUPFfR 



/I! BIT COUNTER 

/6NABl,C SHIFT SECTOR AND SURFACE 
/tOAO MAINTENANCE 
/a BIT SHIFT 



/6NA8i.l R6*0 BUFFER 
/^OAD MAINTENANCE 
/S*VE SURFACE AND SECTOR 
/READ CRC 
/READ COMMAND 



/REPORT 



/ 

PAGL 

/ 

/RoyiiNE , _ . . , 

/SET 184.1 TO ENABLE SMJFT 

f 

MAIN2. 



TO ENTER HAINTeNAHcE 
SHIFT TO 



MOot 
liOwlR 5 



'9 

11.0 



CU* CLl CMS. RAH 
WOMAN 
RAR 
UOMAN 
CUA CLl 
JMP J MAfN2 

/ 

/SUBROUT|N| FOR "NO ERRORS" AND S5OPE 
/lOOPS-, UPDATE yP eoUNTER -REGl" AND 
/OOHn'cOUNT "REG?" ON EVERY ENTRY, 
/ 

NeRROi B 

^nO K0200 

SNA CLA 

JMP 



/SNASUe SET MAfNTENANCe MODE 
/LOAD MAINTENANCt 
/gNABLE SET 084.1 
/LOAD MAINTENANCE 



/GET SWITCH 4 
/MASK 

/WAS ST SET 
/Ne DON<T HALT 



410 


Vi4Z 


20bAPR>73 




1117 


?014 


X1T5 




Tab 






TB15 








I 




?ai6 


7402 


STPKUT , 


Htl 






7017 


?207 




{Si 




NERRO 


7gg0 


1607 






i 


NESRO 


?02t 


3g«0 




05* 




SNgRRO 




7604 




t*? 






7023 


7710 




SP* 






?024 


86«0 




JMf* 


i 


8N|RH0 


7B2S 


21S0 




l^i 




«E8i 


T024 


76ig 






CL* 




?027 


§834 




JMP 




NEiiTST 




1150 




T*0 




«Egt 




7140 






CM* 




7032 


SlSl 




og* 






7033 








I 




7034 


2207 




ISi 




NCRRO 


7035 


2207 




|S2 




NEHRO 


7034 


5607 




JMf» 


I 


NERRO 


7237 


00@0 


/ 

TOTbT , 


0 








0000 




0 







fASE ie70 



7IB42 



7S)*S SgSi 

?B44 U4S 

T«49 6201 

Te46 3460 

?»47 li46 

70»0 S4«l 

70S1 1023 

TBS2 3442 

TB53 7402 

7054 5641 



/suBHOUTiNi TO Setup field • 
/ 

SETWi 0 

TAB 1 THlFiD 
ogA 8AMrtD 
TAP KRmF 

cor ei 
OCA I K00ei 

TA? KS40S 

DC* I K0002 
TAB iNtRO 

DC* t Ke003 
BAKfUOi Ht! 

JHP I SETUP" 

/ 

/ROUTJNE TO 1,0*0 UPiPE" BUFFER 
/ 



y0S5 


0000 


UPP£Ri 


0 


TOtST 


T056 


3237 




OCA 


?057 


7301 




CL» CUU 


I At 


7060 


3240 




OQA 


SNERRO 


T061 


1132 




TAO 




7062 


3207 




O5A 


NERRQ 


7063 


4456 




ENMANl 




7054 


1237 


UPPHli 


TAO 


TOfST 


7065 


0240 




ANO 


SNERRO 


7066 


7640 




SiiA C\,k 




7067 


1061 




TAO 


K0e02 


7070 


1072 




TAO 


K0{01! 


7071 


4447 




UDMAN 




7072 


7300 




CU* CLl 




7073 


1240 




TAO 


SNERRO 



/SET BJNlRV ENO 

/nepikct If 

/^fOP PROORA" HAUT 

/ypoATe PC sTQRE 

/SSI SCOPE ueOP POINTER 
/ffORE FBR RFTURN 

/iET swjTgw 0 
/INTER SCOPt 1.80P 

/UPDATE UPCOUNTEH 

/tMO OF PAI«T!CU|,»R Tift 



/SETUP DOWN COUNTER 

/BACK TO SAME TEST 
/yPOATE PC STORE 

/yPDATE »C STORE 
/T8 NEXT SeUUENTUl, TEST 



/SET Home bf 

/(JET RMF FBH JNT, RETgRN 
/SIWITCH FJEUP f 

/JMP I 3 FOR i.BC, Z 

/SET ABORESS RETURN 

/HOME OF 



/SAVE DATA 

/S?TUP SWIFTER MASKER 

/SETUP CeyNTER 

/ENTER MAlNtFNANCE MODE 

/SET 0*T* 

/MASK 

/A ONE 0» J£i»OT?TT 
/A ONE) I ! I 
/ENAeUE 'SHIFT 
/iiOAn MAINTENAMCt 



7B74 71,04 
7075 

7076 ?207 

7077 5264 
7100 9655 



20«APR«73 



RAISE i«7l 



C\,U "At 
05* 

JMP 
JMP I 



SNERRO 
NERRO 
UPPRl 
UPPER 



/50UMT BITS 
/MORE TO 08 
/ypPER BUFFER UO*DED 



/ROyTjNE TO CHANGE PROGRAM OEVJCE COOt? 
/ 





76?4 


CHANCi 


I.AS 




7i»2 






AND 


A0770 


710S 






OC* 


TOfST 




i5?6 




TAO 


CHNPOT 


7J,P15 


5255 




ogA 


UPdER 


7106 


13?S 




TAU 


ccnthi 


710? 


3240 




DtA 


SNERRO 


7110 


1655 


CHANCH, 


TAU I 


UPKER 


7Hi 






DC* 


SEtUP 


7il2 


16*1 




TAO 1 


SEtUP 


7X13 






ANO 


A7e07 


7114 


1237 




TAD 


TOtST 


7115 


3641 




DC* I 


SEtUP 


7116 


2255 




I§« 


UPPER 


7117 


2240 




IS8 


SNCRRQ 


7120 


5310 




JMP 


CHaNCR 


7121 


7402 




HW! 




7122 


5321 


/ 


JKP 


.•t 


7123 


7007 


A7007, 


7007 




7124 


^770 


A077ai 


0770 




7125 


7771 


CCNTHJ, 


7771 




7126 


7127 


CHNPOT, 


CHNPOT 


+1 


7127 


6479 




lOTl 




7130 


6502 




S0T2 




7131 


6463 




J0I3 




7132 


6495 




I0T4 




7133 


6444 




I0T9 




7134 


6471 




10T6 




7135 


6906 


/ 


I0T7 




7136 


2003 


Texpc. 


TEXT 


"Pel" 


7137 


7200 








7140 


(^704 


TEXUO, 


TEXT 


"GDI" 


7141 


7Z00 








7142 


JI322 


TEXUK, 


TEXT 


"CRr" 


7143 


7200 






"St 1" 


7144 


2324 


TEXST, 


TEXT 


7145 


7200 








7146 


0402 


TEXOB, 


TEXT 


"08 t" 


7147 


7200 








7150 


C3i5 


TEXCH, 


TEXT 


"Ch!" 


71!'l 


7200 








7152 


?4B1 


TEXDA, 


TEXT 


"DAS" 


71b3 


7200 








7154 


0104 


TEX*0, 


TEXT 


"AO!" 




7200 









/?AVE DESlPtn 



/A FEW POJWTFRS 
/5ET ABDRESb POINTER 
/SAVE IT 

/QET OLD lOT C80E 

/ADD IN CESIREO 
/CHANCE root 

/Ui»0*Te »Q!NTER 
/yPDATE CHANGE COUNTER 

/DEVICE CODES CHANOEO 



il£7 



7i56 
?3,57 

T163 
7i64 

7170 
7i71 
7172 
7173 
7174 
7175 
7176 
7177 
7200 
7201 
7202 
72es3 
72514 
7205 
7206 
7207 
7210 
7211 
7212 
7213 
7214 
7215 
7216 
7217 
7220 
7221 
7222 
7223 
7224 
7225 
7226 
7227 
7230 
7231 
7232 
7233 
7234 
7235 
7236 
7237 
724? 
7241 
7242 
7243 



0424 
7200 

7206 

2324 

?124 

2523 

4022 

3507 

1123 

2405 

2240 

3522 

2217 

2200 

0317 

1915 

3116 

3440 

2205 

0711 

2324 

0922 

4005 

2222 

1722 

S000 

0411 

2313 

4001 

0404 

2205 

2323 

4022 

0507 

1123 

2409 

2240 

0522 

2217 

2200 

0401 

2401 

4002 

2205 

0113 

4005 

2222 

1722 

^000 

^322 

2340 

2205 

0711 



TEKUli TEXT "Dft" 

TEXAC, TEXT "Afil" 
/ 

ERTXl, TtXT "STATUS "CGjSTtK tRROK" 



ERTX2, T6XT "Command pecisTER error" 



ERTX3, TEXT "DISK ADDRESS REGISTER ERReR" 



ERTX4, TEXT 



EhTX9| text 



"OiTA IRCAk error" 



'Crc register Error" 



PAL10 V142 



2B»APR»73 



PA8E 1»73 



7244 

7245 

7246 

7247 

72S0 

7251 

7252 

7253 

7254 

7295 

7256 

7257 

7260 

7261 

7262 

7263 

7264 

7265 

7266 

7267 

7270 

7271 

7272 

7273 

7274 

7275 

7276 

7277 

7300 

7501 

7302 

7303 

7304 

7305 

7306 

7J07 

731." 

7311 

7312 

7313 

7514 

73! 5 

73! 6 

73; 7 

73; B 
7S; i 
Tj; 2 
73; 3 
7j; 4 

7 j: 5 

73* 6 
7327 
T330 
7331 



2)24 
0522 
4005 
2222 
1722 
0000 
0401 
2401 
4022 
0507 

i;23 

2405 
2240 
0922 
2217 
2200 
0411 
2913 
4023 

un 

2040 
0522 
2217 
2200 
0411 
2313 
4011 
1624 
0522 
2225 
2024 
4005 
2222 
1722 

0000 

0103 
4022 
0S07 
1123 
2405 
2240 
0522 
2217 
2200 

2213 
7009 



4004 
1123 
1314 
<.'52Z 
2340 
2001 
2323 
4033 



ERTX6, TEXT "DATA REGISTER ERROR' 



ERTX7, TEXT "OfSK SKIP ERROR" 



ERTX8, TEXT 



"DiSK iNTERRiJpT ERRO"' 



ERTX», TiXT 



"At REClsTfR Error" 



TEXtNQ. T|XT "RkBe oISKwESS PASS cPMPUETE" 



T332 1715 

7333 2014 

7334 H524 

7335 0530 

/ 



/ 




V142 20 


•APR-73 


Hi? 


f»AC£ t»79 






0000 
0102 


11112000 
llllllU 


100000190 
llllllU 


llllllll 

iiiuiii 


uauiu 
llilllil 


llllllll 
IIUIUI 


llllllll 
illiliil 


illlJlU 

uuuu 


ilUllU 
ulilua 


0200 
0300 


llllllll 

imiiii 


llllllll 
lUlllll 


llllllll 
llllllll 


llilllil 
llllllll 


llllllll 
llllllll 


llllllll 
lUiiUi 


UUUU 

Illlllll 


uuuu 

ilUllU 


i)4i!(} 


llllllll 
llllllll 


llllllll 
llllllll 


llllllll 
llllllll 


llilllil 
llilllil 


lUlllll 

uuuu 


illlUli 
llllllll 


llllUU 

iiuiiii 


uuuu 
uuuu 


fc)70£) 


llllUU 

llllllll 


llllllll 
llllllll 


llllllll 
llllllll 


llilllil 

llilllil 


llllllll 
llllllll 


llllllll 
illiiill 


llllllll 

ilUUU 


UllllU 

uuuu 


1000 
1100 


llllllll 
llllllll 


llilllil 
liillili 


llllllll 
llllllll 


llilllil 
llilllil 


llllllll 
llilllil 


llllllll 
llllllU 


uuuu 

Illiiill 


UllllU 

uuuu 


12i!0 

i?ei0 


llllllll 

lllilHl 


llllllll 
llllllll 


llllllll 
llllllll 


llilllil 
llilllil 


llllllll 
llllllll 


illiuu 

llllUU 


illiiill 

iiuiecs 


uuuu 

B0000000 


1400 

ispe 


illlllll 
llllllll 


llllllll 
llllllll 


llllllll 
llllllll 


llilllil 
llilllil 


llllllll 

llllllll 


uuuu 

llllUU 


IlUiUl 
UllllU 


uuuu 

UllllU 


1600 
1700 


llllllll 
llllllll 


llllllll 
llllllfl 


llllllll 
llllllll 


llilllil 
llilllil 


llllllll 
llllllll 


iiiiuu 

llllUU 


tlltliU 

Illlllll 


UllllU 
11110000 


2000 
2100 


llllllll 
llllltll 


llllllll 
llllllll 


llllllll 
llllllll 


llilllil 

llilllil 


llllllll 
tililill 


llllllll 
llllllll 


Illlllll 
11101000 


illlllll 

00000000 


2200 
2300 


llltllll 
llllllll 


lltlllil 
llilllil 


llllllll 
llllllll 


llilllil 
llilllil 


llllllll 
00000000 


llllllll 
00000000 


llilllil 

00000000 


ilCliill 

00000000 
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